masukkan kode program yang ada dibawah ini atau copy paste saja :
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("MASUKAN PASSWORD....KALO TIDAK MAKA KOMPUTER INI AKAN SHUTDOWN....MADE BY ANDA..!!!komputer akan mati jika tidak dimasukkan password :","www.abc.com")
if quest="" then
m=MsgBox("Tolong masukkan password dulu..", 0+0+48, "")
end if
loop
if quest="passwordnya" then
s.run "shutdown -a"
sd.run winpath & "\explorer.exe /e,/select, " & Wscript.ScriptFullname
else
s.run "shutdown -s -t 0"
end if
Ganti tulisan berwarna Biru itu dengan Pasword Sobat, lalu save as dengan nama “passwordlock.vbs” tanpa tanda kutip, sebelum di save as pastikan pilih all files.
Kedua buka lagi Notepad, kemudian copy paste script kode dibawah ini ke notepad:
[Autorun]
shellexecute=wscript.exe aolih.vbs
action=FLASHDISK SAYA
label=izin sama yang punya
anda dapat merubah kata “izin sama yang punya” sesuai kata-kata mutiara keinginan anda sendiri. Setelah itu lakukan penyimpanan seperti file yang pertama, tetapi pada bagian File name tulislah “autorun.inf” tanpa tanda kutip, sebelum di save as pastikan pilih all files. Kemudian pindahkan kedua file yang telah anda buat tadi (autorun.inf dan passwordlock.vbs) ke dalam flashdisk anda.
Langkah terakhir silahkan anda hidden autorun.inf dan passwordlock.vbs yang telah dibuat tadi.
Cara hidden : klik kanan pada masing- masing autorun.inf dan passwordlock.vbs lalu pilih properties centang kotak yang ada di tanda hidden. selesai .
Cara hidden : klik kanan pada masing- masing autorun.inf dan passwordlock.vbs lalu pilih properties centang kotak yang ada di tanda hidden. selesai .
sumber -http://andy2dsd.blogspot.com/2013/05/cara-memberi-proteksi-pada-flashdisk.html
0 komentar:
Posting Komentar