ISDBSongData::Occasion

CoClass SDBSongData, Interface ISDBSongData

Property Get/Let Occasion As String

Property description

Occasion

Scripting Object	SDBSongData
Value Name	Occasion
Value Type	String
Database Table	Songs
Field Name	Occasion
Field Type	Text
Tracklist Column	Occasion
Example Data	Background

Example Code

Complete script

Sub

  For iCounter = 0 to objSongList.count - 1                                    'SongLists
      Set objSongData = objSongList.Item(iCounter)
      StringOccasion = objSongData.Occasion
      SDB.MessageBox "Value = '" &  StringOccasion & "'", mtError, Array(mbOK)    'SDB.MessageBox
  Next
' objSongData.Occasion = StringNewOccasion 'Commented Out For Safety
' objSonglist.UpdateAll              'Commented Out For Safety                 'UpdateAll
                         Updates db and writes tags (if checked in options)
End Sub