Create Folder Locker
Create Your own Folder Locker using the following script
open notepad and type the following :-
dim pass,st
set fso=CreateObject("Scripting.FileSystemObject")
if fso.FolderExists("Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}") then
pass=inputbox("Enter Password To Unlock")
if pass="yourpassword" then
set st=fso.getfolder("Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}")
st.name="Locker"
else
wscript.echo "Wrong password Entered....!"
end if
Else
if fso.FolderExists("Locker") then
set st=fso.getfolder("Locker")
st.name="Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
else
fso.CreateFolder("Locker")
end if
end if
Now save the file as locker.vbs
The Script When Executed will create a Folder "Locker". Just put the files in that folder that you want to lock and then again Execute the script!
Note: Replace the "yourpassword" with your own password
0 comments:
Post a Comment