cara mengunci flash disk dan CD tanpa sofeware

supaya file file kamu aman di flash disk kamu gk di otak atik temen,adik,anak kamu

gk pake sofeware gampang dan simpel

cara
buka notepad
copas kode dibawah 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("maukin,password kamu kalu salah komputer akan gw matin ","http://forantum.blogspot.com")
if quest="" then
m=MsgBox("opss lu belum memasukkan password...!", 0+0+48, "http://forantum.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

ganti "TULIS PASSWORD DISINI" jadi password kamu

selamat mencoba