09/08/31 21:52:03 ZXdbnPxa
'tvtestrun.vbs
query = "select * from Win32_Process where Name='TVTest.EXE'"
Set ws = GetObject("winmgmts:{impersonationLevel=impersonate}").ExecQuery(query)
flag = true
for each process in ws
process.terminate
flag = false
Next
Set WshShell = WScript.CreateObject("WScript.Shell")
if flag then WshShell.Run "TVTest.exe "
'ここまで
・これを.vbsで保存してTVTestと同じフォルダに入れる
・.vbsのショートカットをデスクトップにおく
・ショートカットのプロパティ開いて、ショートカットキーにカーソルをあわせリモコンで起動させたい
ボタン押して割り当てる
以上で次回からリモコンで起動できるよ
最後の "TVTest.exe "に "TVTest.exe /d"とか付け加えればドライバ指定もおｋ