Monday, August 11, 2008
at
5:48 AM
|
Em,suruh laptop/pc kmu bercakap!!!buat nie....hehe....try it...
1. buka notepad
2. copy dan paste code nie...
Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
3. save la apa2 nama pun..yg pntg .vbs....
cth: Cakap.vbs
1. buka notepad
2. copy dan paste code nie...
Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
3. save la apa2 nama pun..yg pntg .vbs....
cth: Cakap.vbs
Posted by
Jai
Labels:
Notepad
0 comments:
Post a Comment