Make Your Computer Talk

• Open a Notepad.

• Copy and paste the below code and save the notepad as “talk.vbs” (without quotes).

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

• Double click talk.vbs and type any text and see the magic.