Langsung Aja nih Dicoba..
Nih Script nya :
Dim msg, sapi
msg=InputBox("Enter your text","S.O.A")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
Selanjutnya
1.buka notepad
2.copy dan paste script yg bercetak tebal diatas ke notepad
3.save as, dengan nama ngomong.vbs , pokok nya nama nya apa aja asal extensi nya vbs, tapi inget pas save as , save tipe as nya haris all file
sumber: http://phl.web.id/
Tidak ada komentar:
Posting Komentar