- 814 名前：nobodyさん mailto:sage [2007/11/20(火) 19:16:10 ID:???]
- スクリプト改造スレということなので、こちらで質問させて下さい
スレ違いでしたらどうかお許し下さい
【こんなスクリプトにしたい】
「サウンドとオーディオのプロパティ」の「音量」タブが開いた状態でスクリプトを実行させて、
「オーディオ」タブ の「音の再生」の「既定のデバイス」を切り替えたい 。
以下のスクリプトを改造すればできそうなのですが、アドバイスを頂けないでしょうか。
また、全く新規のスクリプトでもかまいません。
WinXPsp2
「サウンドとオーディオのプロパティ」の「オーディオ」タブ を開き、「音の再生」の「既定のデバイス」を切り替えます。
Dim objWshShell
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run "control MMsys.cpl ,2", 0, False
WScript.Sleep 500
objWshShell.AppActivate "サウンドとオーディオデバイスのプロパティ"
WScript.Sleep 100
objWshShell.SendKeys "{DOWN}", True
WScript.Sleep 500
objWshShell.SendKeys "{ENTER}", True
kamakura.cool.ne.jp/vaio_r/tips/etc/usb_audio.htm
|
 |
