Speeking XP

By kottayan

copy the below code( 4 lines) and save it as speak.vbs

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

Leave a Reply

You must be logged in to post a comment.