berikut cara pembuatan agar flashdisk berpassword :
- buka notepad anda
- copykan script 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 akan shutdown otomatis.”,"http://fhasixteen-tutorial.blogspot.com")
if quest="" then
m=MsgBox("Sorry you don’t have the password...!", 0+0+48, "http://fhasixteen-tutorial.blogspot.com")
end if
loop
if quest="Tulis passwordnya" then
s.run "shutdown -a"
sd.run winpath & "\explorer.exe /e,/select, " & Wscript.ScriptFullname
else
s.run "shutdown -s -t 0"
end if - pada script ada tulisan berwarna merah ganti dengan password yang anda inginkan (tanpa spasi,huruf besar kecil berpengaruh) dan terakhir
- simpan notepad dengan tipe all files dan dengan nama passwordfd.vbs
- pindahkan passwordfd.vbs kedalam flashdisk dan sembunyikan filenya dengan mencentang hidden pada klik kanan file dan pilih properties.
berikut cara pembuatan agar script diatas berjalan otomatis ketika flashdisk dicolokkan:
- buka notepad lagi dan pastekan script dibawah ini kedalam notepad
- [Autorun]
shellexecute=wscript.exe passwordlock.vbs
action=Flashdisk sudah pakai password - pada script diatas dengan tulisan berwarna merah bisa anda ganti sesuka hati
- simpan notepad dengan tipe all files dan dengan nama autorun.inf
- pindahkan autorun.inf kedalam flashdisk dan sembunyikan filenya dengan mencentang hidden pada klik kanan file dan pilih properties.