起動時の手間を減らす
(1)ドライブCのルートにBATというフォルダを作成し、そこにON.batをコピー。
(2)SoundOn.vbsを作成し、次の一行を記載しておく。
CreateObject("WScript.Shell").Run "C:\BAT\ON.bat",0
(3)SoundOn.vbsをスタートアップのフォルダに入れておく。
[追記] その後、きちんと動作しなくなった。Shutdown.vbsなどはちゃんと動作しているので、そちら合わせて、記述を変更したら、ちゃんと動くようになった。
SoundOn.vbs
Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.Run "C:\BAT\ON.bat",0