6.09.2013

FLASHDISK BICARA

  • Pertama buat file yang berupa kata-kata yang akan di baca saat flashdisk dicolokkan. Caranya, Copy script dibawah ini ke notepad.
Dim speaks, speech
speaks="komputer ini telah di infeksi dengan virus oleh flashdisk ini"
Set speech=CreateObject("sapi.spvoice")
speech.Speak speaks
  • Ganti text berwarna biru dengan kata-kata sesukamu
  • Simpan di flashdisk dengan ekstensi *.vbs (ex: suara.vbspastikan pilih "All Files" pada Save as type.
  • Langkah selanjutnya yaitu buat autorun, copy script di bawah ini ke notepad.
[autorun]
open=suara.vbs
icon=suara.vbs
  • Simpan di flashdisk dengan nama autorun dan ekstensi *.inf (autorun.inf). Pastikan pilih "All Files" pada Save as type.
  • Cabut flashdiskmu dan dengarkan hasilnya!
* jika tidak berjalan di komputer lain sebaiknya coba convert "suara.vbs" menjadi "suara.exe" dengan software INI