便利なスクリプト - iTunes for Windows まとめ下記のスクリプトをテキストエディタやメモ帳などにコピペ 15行目「(current.Name, "新しい再生回数の設定", k)」の「k」を変更したい再生回数に書き換える（半角数字で記入） 拡張子をtxtからvbsに変更して、countedit.vbsとでも名前をつけて保存 あとはダブルクリックして実行 Dim iTunesApp Dim Tracks, numTracks Dim i, k Dim current set iTunesApp = WScript.CreateObject("iTunes.Application") set iShell = CreateObject("Wscript.Shell") iShell.AppActivate("iTunes") set Tracks = iTunesApp.SelectedTracks numTracks = Tracks.Co
