5 lines
188 B
Plaintext
5 lines
188 B
Plaintext
|
Set oVoice = CreateObject("SAPI.SpVoice")
|
||
|
|
set oSpFileStream = CreateObject("SAPI.SpFileStream")
|
||
|
|
oSpFileStream.Open "C:\Success.wav"
|
||
|
|
oVoice.SpeakStream oSpFileStream
|
||
|
|
oSpFileStream.Close
|