WSH/サウンド再生
をテンプレートにして作成
Search in
this wiki
and
or
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
]
開始行:
専用のAPIはないので、sndrec32で代替
Sub Sound()
strSoundFile = "C:\Windows\Media\tada.wav"
Set objShell = CreateObject("Wscript.Shell")
strCommand = "sndrec32 /play /close " & chr(34) & strS...
objShell.Run strCommand, 0, True
End Sub
終了行:
専用のAPIはないので、sndrec32で代替
Sub Sound()
strSoundFile = "C:\Windows\Media\tada.wav"
Set objShell = CreateObject("Wscript.Shell")
strCommand = "sndrec32 /play /close " & chr(34) & strS...
objShell.Run strCommand, 0, True
End Sub
ページ名:
![[Return to Top Page]](image//logo.png "[Return to Top Page]"){kind=logo}
