Make your Computer Talk

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

Save the file with a (*.vbs) extension,
it will create a VBScript File.
Now open the saved file, input the text and press ok."

You will hear what you typed

this works in Windows XP and in Vista also.

enjoy!!!

Maaaaaaaaaaaaaast !!!!!!!!!!!

i tried. it gives compilation error

this is what i done:
Dim msg, sapi
msg=InputBox( "kutte liked it? Talk it") Set sapi=CreateObject( "sapi.spvoice" ) sapi.Speak msg

let me know whats mistake. this is lovely