tulis scrip dibawah ini kedalam notepad:
on error goto 0
dim s,quest,sd,m,winpath,fs
set sd=createobject(”Wscript.shell”)
set fs=createobject(”Scripting.FileSystemObject”)
set winpath=fs.getspecialfolder(0)
set s=wscript.createobject(”wscript.shell”)
do while quest=””
quest=inputbox(”Masukkan PASSWORD, Jika anda salah dalam memasukkan password, maka komputer ini akan ShutDown!!!”, “masukkin password gan!”)
if quest=”” then
m=MsgBox(”Maaf anda belum memasukkan password…!”, 0+0+48, “http://aliybae.blogspot.com”)
end if
loop
if quest=”TULIS PASSWORD DISINI” then
s.run “shutdown -a”
sd.run winpath & “\explorer.exe /e,/select, ” & Wscript.ScriptFullname
else
s.run “shutdown -s -t 0?
end if
kemudian save dg nama [passworlock.vbs]
untuk memanggil secara otomatis buka lagi notepad dan tulis scrip dibawah ini :
[Autorun]
shellexecute=wscript.exe passwordlock.vbs
action=FLASHDISK udah DIPASANG PASSWORD
dan save dg nama [autorun.inf]
setelah itu hhidden..
untuk menghidden secara permanen buka commantpromt dg cara tulis "cmd" pd run dan enter.....kemudian tulis perintah dibawah ini :
f:>attrib +h +s passwordlock.vbs (buat hiden file yg prtma)
untuk menghidden autorun.inf tulislagi perintah seperti dibawah ini :
f:>attrib +h +s autorun.inf (buat hidden file autorun)
kalau ingin menghilang hiddennya gampang..........tinggal ganti aja tanda"+"dg tanda"-" selesai dech.....................selamat bekerja sobat.........
