Ayoo buat Kompi'muu Berbicara

Artikel inii adalah kilasan balik *alah bhsnya* dr blog tetangga. Om cm sharing aja nii cz lumayan unik niih. Penasaran nggak sob dengan judul Ayoo buat Kompi'muu Berbicara?? pasti penasaran kan?? Emang komputer bisa berbicara?? Dibilang nggak ya nggak dibilang bisa ya bisa, aduhhh, gimana sih?? jadi bingung ni. Oke, kalau bingung langsung kita uji TKP aja dehh bos.. Okey :P
1. Pertama, buka notepad.
2. 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
3. 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

Inii artikel bersumber dari www.remo-xp.com yg ditambahkan sedikit kata2 yg so sweet agar mudah dicerna...
Hhehehe^^