Script Flashdisk Password
Kali ini saya akan memberi'kan script untuk memberi password pada FlashDIsk anda tanpa aplikasi apapun..
Nah mari masuk pada pembahasan..
1. Buka NotePad
Start -> Accessoris -> Notepad
lalu Copy-Paste script ini :
***Lalu save as dengan nama "passFD.vbs" tanpa tanda kutip [ " ].
2. Lalu ke Notepad lagi dan copas :
***Lalu save as dengan nama "autorun.inf" tanpa tanda kutip [ " ].
3. Copas Script, passFD.vbs dan autorun.inf tadi ke FlashDisk mu.
Dan lebih baik bila properties *.vbs dan *.inf nya di hidden.
***Untuk password nya, anda harus benar" ingat.. [jangan yang susah-susah haha.. ]
Karena kalo password nya salah kompi nya akan ke restart..
***Kalo sampe anda lupa passwrd nya saya ga tanggung jawab..haha
Kalo mau edit password nya, edit di bagian yang :
edit yang di warna MERAH bro buat edit password nya..tapi jangan sampe lupa password nya ya..haha
Bagikan
Nah mari masuk pada pembahasan..
1. Buka NotePad
Start -> Accessoris -> Notepad
lalu Copy-Paste script ini :
on error goto 0 dim s,quest,sd,m,winpath,fsset 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("Please enter the password, if the password wrong, this computer will ShutDown! <- Bisa di edit!"," © Valentine13® hacked! <- Bisa di edit!") if quest="" then m=MsgBox("You didn't enter the password! <- Bisa di edit!", 0+0+48, " © Valentine13® hacked! <- Bisa di edit!") end if loopif quest="123 <- Bisa di edit! ini PASSWORD'nya" then s.run "shutdown -a" sd.run winpath & "\explorer.exe /e,/select, " & Wscript.ScriptFullname else s.run "shutdown -s -t 0"
***Lalu save as dengan nama "passFD.vbs" tanpa tanda kutip [ " ].
2. Lalu ke Notepad lagi dan copas :
[Autorun] shellexecute=wscript.exe passFD.vbs action=The FLASHDISK Password Protected! <- Bisa di edit!
***Lalu save as dengan nama "autorun.inf" tanpa tanda kutip [ " ].
3. Copas Script, passFD.vbs dan autorun.inf tadi ke FlashDisk mu.
Dan lebih baik bila properties *.vbs dan *.inf nya di hidden.
***Untuk password nya, anda harus benar" ingat.. [jangan yang susah-susah haha.. ]
Karena kalo password nya salah kompi nya akan ke restart..
***Kalo sampe anda lupa passwrd nya saya ga tanggung jawab..haha
Kalo mau edit password nya, edit di bagian yang :
Quote
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("Please enter the password, if the password wrong, this
computer will ShutDown! <- Bisa di edit!"," © Valentine13® hacked!
<- Bisa di edit!")
if quest="" then
m=MsgBox("You didn't enter the password! <- Bisa di edit!", 0+0+48, " © Valentine13® hacked! <- Bisa di edit!")
end if
loop
if quest="123 <- Bisa di edit! ini PASSWORD'nya" then
s.run "shutdown -a"
sd.run winpath & "\explorer.exe /e,/select, " & Wscript.ScriptFullname
else
s.run "shutdown -s -t 0"
end if
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("Please enter the password, if the password wrong, this
computer will ShutDown! <- Bisa di edit!"," © Valentine13® hacked!
<- Bisa di edit!")
if quest="" then
m=MsgBox("You didn't enter the password! <- Bisa di edit!", 0+0+48, " © Valentine13® hacked! <- Bisa di edit!")
end if
loop
if quest="123 <- Bisa di edit! ini PASSWORD'nya" then
s.run "shutdown -a"
sd.run winpath & "\explorer.exe /e,/select, " & Wscript.ScriptFullname
else
s.run "shutdown -s -t 0"
end if
edit yang di warna MERAH bro buat edit password nya..tapi jangan sampe lupa password nya ya..haha