Script iTunes

[Nitry]

Bonsoir !

Voila j'ai trouvé il y a peu un script qui lance iTunes et joue une playlist, utile pour se réveiller en douceur ! Le voici:

Set objApp = CreateObject("iTunes.Application")
Set colSources = objApp.Sources
Set objSource = colSources.ItemByName("Library")
Set colPlaylists = objSource.Playlists
Set objPlaylist = colPlaylists.ItemByName("&Reveil")
objPlaylist.PlayFirstTrack

Or, avec iTunes mouture 10.x il ne marche plus ! J'obtiens l'erreur suivante:

http://img231.imageshack us/img231/6594/sanstitre1pa.jpg

Quelqu'un pourrait m'aider à le fixer ? Ce serait vraiment super :)

Merki d'avance !