Rabu, 07 Juli 2010

Buat Komputer Bisa Ngomong

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



this is only a game

Tidak ada komentar:

Posting Komentar