Macam biasa script melalui notepad gak.

1. copy script di bawah.
Dim message, sapi
message=InputBox(“What do you want me to say?”,”Speak to Me”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
2. Paste dalam notepad & save file sebagai cakap.vbs (boleh ubah ikut suka hati korang)
3. Then, korang boleh tukar icon yang menyedapkan mata korang.
selamat mencuba…
0 comments:
Post a Comment