Senin, 07 Februari 2011

Tips Membuat Komputer Kita Bisa Ngomong

Hmm…. beneran ngak sih judulnya ya? atau salah ketik nih judul? memang komputer kita bisa bicara yah?

Eits jangan salah sob komputer juga bisa ngomong loh, percaya ngak percaya memang komputer kita bisa ngomong sesuai keinginan kita, jadi seolah-olah komputer kita itu seperti burung beo yang ngikutin kata-kata kita. Ok langsung aja kita ajarin komputer kita berbicara.. Talk Less Do More!!!

Yang pertama kita buka dulu notepad
Setelah itu copy code di bawah ini ke notepad tadi :

Dim pesan, sapi
pesan = InputBox ( "Apa yang Anda ingin saya katakan?", "Berbicaralah kepada-Ku")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak pesan

Setelah itu "Save AS" dengan nama "speak" atau terserah teman teman asalkan harus diakhiri dengan .vbs. Misal, "Speak.vbs".
Setelah itu klik dua kali untuk membuka file tadi, maka akan keluar jendela dialog box seperti ini :
 

 Nah, disitu saya menuliskan "hi, good morning" maka setelah klik tombol OK komputer akan mengatakan sesuai yang kita tuliskan tadi.
Keren kan....