Senin, 30 Mei 2011

Mau komputer BISA NGOMONG??????

aku mau share nih ma kalian tentang cara agar komputer kita bisa ngomong tanpa software apapun.
Trik ini aku dapet dari forum sebelah… :D
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…

Tidak ada komentar:

Posting Komentar