tips membuat komputer kita bicara

penasaran sobb dengan judul tersebut???? pasti penasaran kan,,, ? emang komputer kita bisa bicara?? dibilang engga ya bisa dibilang bisa ya bisa....ike tanpa pikir panjang ikuti tips berikut cekidot.. hahah

Pertama, buka notepad.

Copy-Paste script berikut :

Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

Save as, kemudian pilih all files lalu kasih nama mypc.vbs

4. Selesai

Coba sekarang anda klik 2x.. Gimana?? keren kan?? hehe

Atau kalau yang nggak mau menggunakan InputBox (Jadi pas di klik 2x langsung berbicara tanpa perlu memasukan kata-kata). Scriptnya seperti ini :

Dim msg, sapi
msg = "Ganti dengan kata-kata anda"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

Tips ini sudah saya coba dan hasilnya : 100% Tested n Worked..!!