23 February 2010

Make your XP Talk

Open a notepad and copy the below message as it is:

Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg


Save the file with a (*.vbs) extension Example (mukesh.vbs), it will create a VBScript File.
Double Click On File That You have Saved.
It will prompt you for a text, input the text and press ok."

0 comments:

Post a Comment