Simple Notepad Speak Trick when you type anything on Computer

1. Open Notepad

2. Copy and Paste the following code on it

Dim message, sapi
message=InputBox("What do you want me to
say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

3. Save the file as   speak.vbs

4. Finally open   speak.vbs   file and type something in it. It will speak out. Enjoy...

You like the Post?  Then Please Share it...