ISDBDatabase::GetAutoPlaylistQuery: Difference between revisions

From MediaMonkey Wiki
Jump to navigation Jump to search
m (Added link to ISDBPlaylist::ID)
m (Code clean-up)
 
Line 15: Line 15:


<source lang="vb">
<source lang="vb">
  Dim res, iter
Dim res, iter
  If SDB.MainTree.CurrentNode.NodeType = 71 Then
If SDB.MainTree.CurrentNode.NodeType = 71 Then ' 71 = Auto-Playlist
    Set Iter = SDB.Database.OpenSQL( SDB.Database.GetAutoPlaylistQuery(SDB.MainTree.CurrentNode.RelatedObjectID))
  Set Iter = SDB.Database.OpenSQL(SDB.Database.GetAutoPlaylistQuery(SDB.MainTree.CurrentNode.RelatedObjectID))
    While Not Iter.EOF
  While Not Iter.EOF
      ' do something here....
    ' do something here....
      Iter.Next
    Iter.Next
    Wend
  Wend
  Else
Else
    res = SDB.MessageBox( "You must select Auto-Playlist!", mtError, Array(mbOk))
  res = SDB.MessageBox("You must select Auto-Playlist!", mtError, Array(mbOk))
  End If
End If
</source>  
</source>  


[[Category:Scripting|{{PAGENAME}}]] [[Category:Automation_objects|{{PAGENAME}}]] [[Category:CoClass_SDBDatabase|{{PAGENAME}}]] [[Category:Interface_ISDBDatabase|{{PAGENAME}}]]
[[Category:Scripting|{{PAGENAME}}]] [[Category:Automation_objects|{{PAGENAME}}]] [[Category:CoClass_SDBDatabase|{{PAGENAME}}]] [[Category:Interface_ISDBDatabase|{{PAGENAME}}]]

Latest revision as of 18:41, 20 April 2013

CoClass SDBDatabase, Interface ISDBDatabase

Function GetAutoPlaylistQuery(ID As Integer) As String


Parameters

Name Type Description
ID Integer ID of specified auto-playlist


Method description

Returns SQL query used by specified auto-playlist.

Introduced in MediaMonkey 4.0.

Example code

Dim res, iter
If SDB.MainTree.CurrentNode.NodeType = 71 Then ' 71 = Auto-Playlist
  Set Iter = SDB.Database.OpenSQL(SDB.Database.GetAutoPlaylistQuery(SDB.MainTree.CurrentNode.RelatedObjectID))
  While Not Iter.EOF
    ' do something here....
    Iter.Next
  Wend
Else
  res = SDB.MessageBox("You must select Auto-Playlist!", mtError, Array(mbOk))
End If