Make Your Computer Speak Whatever You Type

This is an amazing trick

1.Open Notepad and copy and paste the following code into it

Dim message, sapi

message=InputBox("What do you want me to say?","Speak to Me")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak message

2.Now save the notepad file with the name talk.vbs at your desktop.

3.Now double click on talk.vbs type in the box whatever you want your computer to speak 


for you...