Open a text file in notepad and write:
"Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg"
Without quotes
Save the file with a (*.vbs) extension, it will create a VBScript File.
It will prompt you for a text, input the text and press ok.
"Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg"
Without quotes
Save the file with a (*.vbs) extension, it will create a VBScript File.
It will prompt you for a text, input the text and press ok.
Comments
occurring a runtime error.
Plz suggest the one more time aftr fix the problm. Thanx in advance
Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
& SAVE IT WITH .vbs filename