How to create a Start up popup box with password.




This is from jhelowagan:


Codes here:

First Code:
msgbox "Hello, (your Message here).",20,"Title"

:::YOu can repeat as many as you can::

Second Codes:

password = "pass"
Do
returnvalue = inputbox("Please enter your password","Password")
Select case returnvalue
Case Password
MsgBox "Welcome"
Exit Do
Case Else
MsgBox "Wrong password. Now loging off.",0,"Wrong Password"
strComputer = "."
strExe = "shutdown.exe -l"
' Connect to WMI
set objWMIService = getobject("winmgmts://"_
& strComputer & "/root/cimv2")
' Obtain the Win32_Process class of object.
Set objProcess = objWMIService.Get("Win32_Process")
Set objProgram = objProcess.Methods_( _
"Create").InParameters.SpawnInstance_
objProgram.CommandLine = strExe
'Execute the program now at the command line.
Set strShell = objWMIService.ExecMethod( _
"Win32_Process", "Create", objProgram)
WScript.echo "Created: " & strExe & " on " & strComputer
WSCript.Quit
End select
Loop

Save the file as anythingyouwant.vbs


Responses

0 Respones to "How to create a Start up popup box with password."

Post a Comment

 

Follow My Blog!

Page Views

free counters
[Oct 23 2011]

Online Users

Recent Posts

Return to top of page Copyright © 2010 | Platinum Theme Converted into Blogger Template by HackTutors