Bonjour à tous,
depuis quelques années j'utilise un script vbs qui permet de modifier le compteur dans Itunes (oui, oui, cela m'est utile).
depuis quelques temps, il ne fonctionne plus, j'ai une erreur : La classe Automation appelée "itunes.application" est introuvable
Code : 80020009
Source : WScript.CreateObject
Quelqu'un saurait-il ce qui se passe ?
Je précise que j'ai bien itunes installé sur mon PC.
voici le code source.
merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Dim iTunesApp, t_selection, x Set iTunesApp = WScript.CreateObject("iTunes.Application") Set t_selection = iTunesApp.selectedTracks x = InputBox("Ceci modifie le compteur des pistes sélectionnées", "Entrez un nombre", 0) If Len(x) > 0 And IsNumeric(x) Then If x > -1 Then For Each T_Track In t_selection T_Track.PlayedCount = x Next End If End If
j7w
Partager