Mau komputer BISA NGOMONG?????? Januari 28, 2010

aku mau share nih ma kalian tentang cara agar komputer kita bisa ngomong tanpa software apapun.

Trik ini aku dapet dari forum sebelah… 😀
Oke, langsung aja.

• 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…