Template:Example Code: Difference between revisions
Jump to navigation
Jump to search
MoDementia (talk | contribs) No edit summary |
MoDementia (talk | contribs) No edit summary |
||
| Line 2: | Line 2: | ||
Set objSongData = objSongList.Item(iCounter} | Set objSongData = objSongList.Item(iCounter} | ||
{{{3|-}}}{{{2|-}}} = objSongData.{{{2|-}}}{{#ifeq:{{{3|-}}}|Object|.Member}} | {{{3|-}}}{{{2|-}}} = objSongData.{{{2|-}}}{{#ifeq:{{{3|-}}}|Object|.Member}} | ||
SDB.MessageBox "Value = '" & {{{8|-}}} & "'", mtError, Array(mbOK) | SDB.MessageBox "Value = '" & {{{8|-}}} & "'", mtError, Array(mbOK) '[[ISDBApplication::MessageBox|SDB.MessageBox]] | ||
Next | Next | ||
' objSongData.{{{2|-}}}{{#ifeq:{{{3|-}}}|Object|.Member}} = {{{3|-}}}New{{{2|-}}} 'Commented Out For Safety | ' objSongData.{{{2|-}}}{{#ifeq:{{{3|-}}}|Object|.Member}} = {{{3|-}}}New{{{2|-}}} 'Commented Out For Safety | ||
Revision as of 07:37, 10 April 2008
For iCounter = 0 to objSongList.count - 1 'SongLists Set objSongData = objSongList.Item(iCounter} -- = objSongData.- SDB.MessageBox "Value = '" & - & "'", mtError, Array(mbOK) 'SDB.MessageBox Next ' objSongData.- = -New- 'Commented Out For Safety ' objSonglist.UpdateAll 'Commented Out For Safety 'UpdateAll Updates db and writes tags (if checked in options) End Sub
