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 6: | Line 6: | ||
        SDB.<span style="color: #66cc66;">MessageBox</span> <span style="color: #ff0000;">"Value = '"</span> &  {{{3|-}}}{{{2|-}}} & <span style="color: #ff0000;">"'"</span>, mtError, <span style="color: #b1b100;">Array</span><span style="color: #66cc66;">(</span>mbOK<span style="color: #66cc66;">)</span>    '[[ISDBApplication::MessageBox|SDB.MessageBox]]  |         SDB.<span style="color: #66cc66;">MessageBox</span> <span style="color: #ff0000;">"Value = '"</span> &  {{{3|-}}}{{{2|-}}} & <span style="color: #ff0000;">"'"</span>, mtError, <span style="color: #b1b100;">Array</span><span style="color: #66cc66;">(</span>mbOK<span style="color: #66cc66;">)</span>    '[[ISDBApplication::MessageBox|SDB.MessageBox]]  | ||
    <span style="color: #b1b100;">Next</span>  |     <span style="color: #b1b100;">Next</span>  | ||
  ' objSongData.{{{2|-}}}{{#ifeq:{{{3|-}}}|Object|.Member}} = {{{3|-}}}New{{{2|-}}} 'Commented Out For Safety  |   <span style="color: #808080;">' objSongData.{{{2|-}}}{{#ifeq:{{{3|-}}}|Object|.Member}} = {{{3|-}}}New{{{2|-}}}</span> 'Commented Out For Safety  | ||
  ' objSonglist.UpdateAll              'Commented Out For Safety            '[[SDBSongData|UpdateAll]]  |   <span style="color: #808080;">' objSonglist.UpdateAll</span>              'Commented Out For Safety            '[[SDBSongData|UpdateAll]]  | ||
                           Updates db and writes tags (if checked in options)  |                            Updates db and writes tags (if checked in options)  | ||
  <span style="color: #b1b100;">End Sub</span><noinclude>[[Category:Template]]</noinclude>  |   <span style="color: #b1b100;">End Sub</span><noinclude>[[Category:Template]]</noinclude>  | ||
Revision as of 07:53, 10 April 2008
Sub 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