Tips Membuat Komputer Kita Berbicara??
Mang Bisa...Mari kita coba...
- 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
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
- Selesai
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
Related Post
Computer
- Membatasi Bandwidth Tanpa Software
- Menghapus Salah Satu OS dari Daftar Boot
- Membatasi Akses Program di Windows
- Cara Lengkap Instalasi Windows XP
- menghilangkan pesan dari genuine" You may be a victim of software counterfeiting"
- Tips memilih hardisk External
- Jebol password deep freeze dengan Anti Deep Freeze v0.2
- Mengubaha Bahasa Microsoft Office 2007 menjadi bahasa Indonesia
- shut down komputer secara otomatis
- Mempercepat SHUT DOWN pada komputer Via Klik Kanan Start Menu
- Trik Mengatasi Dr.Watson P.D. Pada PC