You could get the com plugin and try

local iTunesApp = com.create_object("iTunes.Application")

then try iTunesApp.CurrentTrack.Artist 

com plugin at the moment only in 

http://tech.groups.yahoo.com/group/power-pro/files/0_TEMP_/AlansPluginProvisional/

and is under revision.  And may not work.

--- In [email protected], "quantiworks" <quanticwo...@...> wrote:

 
> VB Code:
> --------------------------------------------------
> 1. Private Sub Form_Load()
> 2. Dim iTunesApp As New iTunesApp
> 3.  
> 4. MsgBox (iTunesApp.CurrentTrack.Artist & " - " & 
> iTunesApp.CurrentTrack.Name)
> 5. 
> 6. set iTunesApp = nothing
> 7. End Sub
> --------------------------------------------------
>


Reply via email to