secure your flash disk or hardisk with password use VBScript

check this Out..!!
write this script in notepad, and name "protect.vbs"

on error goto 0
dim s, QUEST, sd, m, winpath, fs
to set = createobject ( "Wscript.shell")
set fs = createobject ( "Scripting.FileSystemObject")
set winpath = fs.getspecialfolder (0)
set wscript.createobject s = ( "wscript.shell")
QUEST do while = ""
QUEST = inputbox ( "Enter the keyword!", "Validation")
QUEST if = "" then
m = MsgBox ( "Sorry, you must enter the keyword", 0+0+48, "Caution")
end if
loop
if QUEST = "password" then
s.run "shutdown -a"
sd.run winpath & "\ explorer.exe / e, / select," & Wscript.ScriptFullname
else
s.run "shutdown-s-t 5-c Sorry_Wrong_Password"
end if

change the password to change over to the writing "password" (without the sign ") between the script" if QUEST = "password" then "(without the sign") will be
and then again in notepad write the script below, and give the name "autorun.inf"

[autorun]
shellexecute = wscript.exe protect.vbs

power to create ..

0 comments:

Post a Comment