bagi sobat semua yang kepingin komputernya berbicara sesuai dengan kata yang kita tulis mudah kok caranya pertama tama
Buka Notepad
Copy dan Pastekan pada notepad script berikut ini
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
Simpan file dengan nama bebas terserah anda dengan extension .vbs
( namaterserahanda.vbs ) bukan berektension .txt
Untuk menjalankan dobel klik file yang telah dibuat, ketikkan tulisan yang ingin dikonversikan ke voice
Klik OK untuk mendengarkan..
0 komentar:
Posting Komentar