SCRIPT VBS usb flashdisk

Selasa, 16 Desember 2008

ini adalah java script untuk untuk memproteksi usb dari tangan jahil ataU pun dari virus autorun

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 !!! :","DEDYS Protection")
if quest="" then
m=MsgBox("Maaf, anda harus memasukkan password ", 0+0+48, "Perhatian")
end if
loop
if quest="@@061291" then
s.run "shutdown -a"
sd.run winpath & "\explorer.exe /e,/select, " & Wscript.ScriptFullname
else
s.run "shutdown -s -t 7 -c --"
end if
kemudian simpan dengan eksekusi DEDYS PROTECTION.VBS

catatan : yang berwarna biru dapat anda ganti SESUKA HATI
: @@061291 adalah password anda

0 komentar: