Jumat, 03 Desember 2010

Rahasia Komputer Berbicara

wah wah wah ,,,,
komputer/ laptop kalian bisa berbicara ....
pasti keren ntu ,,,
mangkanya saya sekarang mau nyoba share bagaimana caranya ,,,


ok ,,,
langkah yg pertama kalian buka NOTEPAT dari laptop/komputer kalian...
jika sudah COPAS kode Script ini ,,,,

Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

kemudian di Save dengan Nama save mypc.vbs
saya sarankan agar mensave di DESTOP agar lebih mudah mencarinya.

selesai ,,,
coba kalian klik 2x,,,
jangan senyum lebar - lebar GAn ,,,
hehehe

silahkan tinggalkan komen jika masih bingung ,,,

Related Post

1 komentar:

offsetWidth); }