MOHON PERHATIAN!!!........ Sehubungan sedang "ERROR"nya situs HTTP://WWW.RIPWAY.COM, maka bila Anda menemukan tutorial yang menggunakan kode dengan nama situs tersebut, sementara waktu JANGANLAH Anda gunakan. Mohon maaf, semoga anda memakluminya.............................

Mengucapkan Selamat Datang, Semoga Dapat Berkenan Di Hati Anda



SYAMSUDINNAMAKU telah hadir

KUNJUNGI CHANNEL YOUTUBE SAYA

Membuat Windows Bisa Bicara


Tips ini hanya sekedar untuk mengisi waktu luang / iseng
anda saja. Kala anda sedang sendirian, tak ada teman
yang bisa diajak bicara, anda bisa coba mengajak
komputer anda untuk berbicara pada anda, berbicara
apa saja yang anda inginkan. Caranya adalah :

1.  Buat New Text Document
2.  Copy - paste script di bawah ini :

Dim msg, syamsudin

msg = inputbox ( "apa yang anda ingin katakan?", "Tulis Kalimat Anda" )

Set sapi = createobject ( "sapi.spvoice")

sapi.speak msg

3.  Kalau sudah, anda klik File (Paling atas sebelah kiri),
     terus pilih Save As...
     Beri nama apa saja terserah anda yang penting di
     akhirnya harus ber-ekstensikan vbs ( .vbs )
     Ubah juga Teks Documents (*.txt)-nya jadi All Files.
     Seterusnya anda klik 'Save'
     Lihat gambar di bawah ini :


4.  Speaker komputer anda hidupkan.
5.  Buka Text Document hasil save as tadi.
     atau (double klik) saja.
     maka akan mucul gambar seperti ini :


6.  Tulis kalimat apa saja yang anda inginkan.
     Bila kalimat yang anda tulis agak panjang,
     maka di akhir kalimatnya anda sisipkan tanda , (koma)
     Setelah itu, klik OK. Dan dengarkan ............


Selamat mencoba.
Good Luck ......


0 comments:

Posting Komentar