안녕하세요, Scripting Guy! - 스크립트 내에서 소리를 재생하려면 어떻게 해야 하나요?

strSoundFile = "C:\Windows\Media\Notify.wav"
Set objShell = CreateObject("Wscript.Shell")
strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
objShell.Run strCommand, 0, true

이 스크립트의 처음 두 줄은 매우 간단합니다. 첫째 줄에서는 파일 경로를 변수 strSoundFile에 할당하고 둘째 줄에서는 녹음기를 실제로 실행하는 데 사용할 Wscript Shell 개체의 인스턴스를 만듭니다.

셋째 줄에서는 내용이 조금 복잡해집니다. 명령 프롬프트에서 녹음기를 실행하려면 다음 명령을 입력해야 합니다.

sndrec32 /play /close "C:\Windows\Media\Notify.wav"

처음 두 개의 명령줄 매개 변수는 이 파일을 재생한 다음 종료할 것을 녹음기에 알려 줍니다. 세 번째 매개 변수는 재생할 파일의 이름입니다. 이 예에서 파일 경로를 큰 따옴표로 묶지 않아도 됩니다. 경로 이름에 공백이 있을 경우에만 따옴표가 필요합니다. 여기서는 경로 이름에 공백이 있는 소리 파일을 재생할 때 사용할 수 있는 예를 제시하기 위해 큰 따옴표로 묶었습니다. 코드는 다음과 같습니다.

sndrec32 /play /close "C:\Windows\Media\Windows XP Error.wav"

파일 경로를 큰 따옴표로 묶으려면 문자열에 큰 따옴표를 삽입하는 Chr(34) 명령을 사용합니다. 그러므로 이 코드 줄에서는 sndrec32 /play /close, 여는 큰 따옴표 기호(“), 파일 C:\Windows\Media\Notify.wav 및 닫는 큰 따옴표 기호(”)로 문자열을 구성합니다.

strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)

마지막으로 네 번째 줄에서는 Run 메서드를 사용하여 방금 구성한 명령 문자열을 전달합니다. 0 매개 변수는 녹음기가 숨겨진 창에서 실행되도록 하며 true는 소리 재생이 끝날 때까지 기다렸다가 다시 시작하도록 스크립트에 알립니다.

메시지 상자를 표시할 때 소리를 재생하는 일은 거의 불가능하다고 볼 수 있습니다. 그 이유는 녹음기가 로드되어 재생하는 데 이미 1~2초가 걸리기 때문입니다. 이 경우 수행할 수 있는 최선의 방법 두 가지는 다음과 같습니다. 첫째, 녹음기를 호출할 때 False 매개 변수를 사용합니다. 이 매개 변수는 소리 재생이 끝날 때까지 기다리지 않고 녹음기를 시작한 후 계속 실행하도록 스크립트에 알립니다.

둘째, Wscript.Sleep 명령을 사용하여 1초 정도 스크립트를 중지합니다. 그러면 그 사이에 녹음기가 로드되고 메시지 상자가 표시될 때 소리 재생이 시작될 수도 있습니다. 그렇다면 메시지 상자가 나타날 때 동시에 소리 재생도 시작될까요? 그렇지는 않습니다. 그러나 비슷하게는 시작할 수 있습니다.

다음은 메시지 상자가 표시될 때 거의 동시에 소리를 재생하는 샘플 스크립트입니다.

strSoundFile = "C:\windows\Media\Notify.wav"
Set objShell = CreateObject("Wscript.Shell")
strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
objShell.Run strCommand, 0, False
Wscript.Sleep 1000
Msgbox "A problem has occurred."