Talking Computer
write anything from computer it will talk
1. open notpad
2. copy paste below texts to notpad
Dim message, sapi
message=InputBox("What do you want me to say?","contact shiyas009@gmail.com")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
3. and save it as talkingcomputer.vbs (.vbs is must)
4. and run talkingcomputer.vbs file
have fun...
Nice one :)
ReplyDelete