Step 1 open notepad
Step 2 copy this code in
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
Step 3 save it as Speak.vbs
Technique for vista
step1 open notepad
step 2 copy this code in
strText = inputbox("what do you want me to say?","Sam")
Set objVoice = CreateObject("SAPI.SpVoice")
ObjVoice.speak strText
step 3 save it as speak.vbs
Here's the Video:
|
|
 |
|
