Powered By Blogger

Dec 11, 2010

Rumus notped Membuat Komputer Kita Berbicara


Penasaran nggak dengan judul Tips Membuat Komputer Kita Berbicara?? pasti penasaran kan?? Emang komputer bisa berbicara?? Dibilang nggak ya nggak dibilang bisa ya bisa,gimana cara jelasinya ya?? jadi bingung ni. Oke, mendingan kita coba praktikan aja, biar lebih mudeng. Talk Less Do More,,, Hehehe
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
selesay
Coba sekarang anda klik 2x.. Gimana?? keren kan?? hehe
clik 2 xfile yang sudah kamu save dan muncul komen isi kolom dengan katakata yangingin dikatakan pada komputer ckik kata kata terus ok computer 100% akan berbicara sendiri

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..!!

Selamat Mencoba

No comments:

Post a Comment

Cara cepat utk kaya !