cara membuat Komputer dapat Berbicara sangat mudah
langkahnya adalah :
1. Buka Notepad
2. Copy Script dibawah
3. Save as dan simpan dengan " .vbs "
4. restart komputer
----------------------------------------------------------------------------------------------
Dim speaks, speech, salam , username
username = CreateObject("WScript.Network").Username
speaks = salam + " " + "kata-kata yang akan di ucapkan komputer"
Set speech = CreateObject("sapi.spvoice")
speech.Speak speaks
----------------------------------------------------------------------------------------------
note :
kata-kata yang berwarna merah dapat di tukar sesuka hati *
Tidak ada komentar:
Posting Komentar