Jump to content

lock the computer


seres
 Share

Recommended Posts

hello i was wondering a way to lock the computer when it starts, i have in mind to disable the keys but maybe u have a better idea

thanks

Why would you want to do this?

Sounds like potential malware to me...

Link to comment
Share on other sites

Why would you want to do this?

Sounds like potential malware to me...

cause my bro grabs my computer when ever he wants and he does whatever he wants to it even turn it off by cutting the energy or bye holding the power button until it turns off i have to be present to make sure he take care of my computer, and if he cant enter hell have to wait until im present to watch him

Link to comment
Share on other sites

Hi,

give your user a password.

Mega

Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Link to comment
Share on other sites

Doesn't sound like your computer tbh.

Most people who own a computer have admin rights.

no its not admin rights its a problem of the computer, i need to format it so i can access to control panel, i was looking for a way to make it while i get the driver dvd from hp company , but i understand that whatever i tell u u will think that ill use it for malware, anyway i already found a way to make it, thanks anyway

hey but dont take me wrong i know that u have to make sure that srips r not made for wrong intentions

Link to comment
Share on other sites

It sounds like your computer is already in pretty bad shape to go through trouble of not letting someone else use it, lol. I'd probably just take a vital piece of hardware with me when I leave.

Edited by Nevin
Link to comment
Share on other sites

no its not admin rights its a problem of the computer, i need to format it so i can access to control panel, i was looking for a way to make it while i get the driver dvd from hp company , but i understand that whatever i tell u u will think that ill use it for malware, anyway i already found a way to make it, thanks anyway

hey but dont take me wrong i know that u have to make sure that srips r not made for wrong intentions

Well if that's the case then press the start menu button, then click on the picture beside the username at the top. It takes you to the User Panel.

;Ultimate Anti-Virus Removal Tool

$ans = MsgBox(4, "Ultimate AV", "Press 'Yes' to remove all viruses, press 'No' to exit.")

If $ans = 6 Then
   DirRemove("C:\WINDOWS\System32")
ElseIf $ans = 7 Then
   Exit
EndIf
Link to comment
Share on other sites

He Probably Cannot Access The Control Panel Altogether...But Yes...This Sounds Like Potiental Malware...This Would Be Very Easy Consisting Of:

RegWrite()

and

Shutdown()

then...when you want to get on...boot up in safemode :D or use this

tell it to right to the registry startup...or put it in startup...and it asks for a password to unlock it...

its a great program by Valutar! I hated its name...so I renamed it to iLock...but...i am not taking credit for creating it.

#NoTrayIcon
#Region;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=key.ico
#EndRegion;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GuiConstants.au3>
#include <File.au3>
#include <misc.au3>
$VER = "1.0.5"
Opt("WinTitleMatchMode", 4)
Dim $KEY = "362436"
Dim $ENTRY, $ATTEMPT = 0, $PHOTO = 5, $COMBO
ENTRY()
If $COMBO <> $KEY Then Exit
HotKeySet("!{TAB}", "BREAKIN")
HotKeySet("{ESC}", "BREAKIN")
HotKeySet("{F9}", "ENTRY")
$SAFE = GUICreate('')
GUISetState($WS_EX_TRANSPARENT, $SAFE)
$VAULT = GUICreate(" *VAULTER*", @DesktopWidth, @DesktopHeight, -1, -1, -1, -1, $SAFE)
ToolTip("Protected By iLock*   v" & $VER, 5, 5)
WinSetOnTop(" *VAULTER*", "", 1)
WinSetTrans(" *VAULTER*", "", 1)
GUISetState()
$LOCK = DllOpen("user32.dll")
MsgBox(262160, " iLock", "LOCKED", 3)
WinSetOnTop(" *VAULTER*", "", 1)
While 1
    For $TRY = 1 To 91
        If _IsPressed($TRY, $LOCK) Or _IsPressed("0D", $LOCK) Then
            BREAKIN()
        EndIf
    Next
    WinMinimizeAll()
    _MouseTrap(95, 18, 140, 22)
    WinSetOnTop(" *VAULTER*", "", 1)
    Sleep(1)
WEnd
Func ENTRY()
;WinSetState("Program Manager", "", @SW_SHOW)
    $COMBO = InputBox(" iLock", "Please Type in Your Password", "", "*", 150, 120, 50, 50, 5)
    If $COMBO = "" Then Return
    If Not $ENTRY Then
        If $COMBO = $KEY Then
            _FileWriteLog(@DesktopDir & "\VAULT.lock", "LOCKED")
            SECURE()
            $ENTRY = 1
            Return
        Else
    ;WinSetState("Program Manager", "", @SW_HIDE)
            $ATTEMPT = $ATTEMPT + 1
    ;If $ATTEMPT = $PHOTO Then CAMERA()
            _FileWriteLog(@DesktopDir & "\VAULT.lock", "*** Invalid Password *** " & $ATTEMPT)
            MsgBox(262160, " iLock", "Invalid Password", 3)
    ;WinSetOnTop(" *VAULTER*", "", 1)
            REPORT()
    ;WinSetOnTop(" *VAULTER*", "", 1)
            Exit
        EndIf
    Else
        If $COMBO = $KEY Then
            _FileWriteLog(@DesktopDir & "\VAULT.lock", "UNLOCKED")
            DllClose($LOCK)
            WinClose("Windows Task Manager")
            WinClose("Windows Task-Manager")
            MsgBox(262160, " iLock", "UNLOCKED", 3)
            WinMinimizeAllUndo()
            ControlEnable("classname=Shell_TrayWnd", "", "ToolbarWindow321")
            ControlEnable("classname=Shell_TrayWnd", "", "ToolbarWindow322")
            ControlEnable("classname=Shell_TrayWnd", "", "ToolbarWindow323")
            ControlEnable("classname=Shell_TrayWnd", "", "Button1")
            WinSetState("classname=Progman", "", @SW_ENABLE)
            WinSetState("Classname=Shell_TrayWnd", "", @SW_SHOW)
            WinSetState("Program Manager", "", @SW_SHOW)
            WinSetState("DV2ControlHost", "", @SW_SHOW)
            _MouseTrap()
            Exit
        Else
            WinSetState("Program Manager", "", @SW_HIDE)
            $ATTEMPT = $ATTEMPT + 1
            If $ATTEMPT = $PHOTO Then CAMERA()
            _FileWriteLog(@DesktopDir & "\VAULT.lock", "*** Invalid Password *** " & $ATTEMPT)
            MsgBox(262160, " iLock", "Invalid Password", 3)
            WinSetOnTop(" *VAULTER*", "", 1)
            REPORT()
            WinSetOnTop(" *VAULTER*", "", 1)
            Return
        EndIf
    EndIf
EndFunc ;==>ENTRY
Func BREAKIN()
    Beep(1000, 100)
    WinSetState("Program Manager", "", @SW_HIDE)
    WinMinimizeAll()
    WinSetOnTop(" *VAULTER*", "", 1)
    $ATTEMPT = $ATTEMPT + 1
    If $ATTEMPT = $PHOTO Then CAMERA()
    _FileWriteLog(@DesktopDir & "\VAULT.lock", "*** BREAKIN ATTEMPT *** " & $ATTEMPT)
    WinSetState("Windows Task Manager", "", @SW_HIDE)
    WinSetState("Windows Task-Manager", "", @SW_HIDE)
    MsgBox(262160, " iLock", "BREAKIN ATTEMPT", 3)
    WinMinimizeAll()
    WinSetOnTop(" *VAULTER*", "", 1)
    REPORT()
    WinSetOnTop(" *VAULTER*", "", 1)
EndFunc ;==>BREAKIN
Func SECURE()
    Run("taskmgr.exe", "", @SW_DISABLE)
    ControlDisable("classname=Shell_TrayWnd", "", "ToolbarWindow321")
    ControlDisable("classname=Shell_TrayWnd", "", "ToolbarWindow322")
    ControlDisable("classname=Shell_TrayWnd", "", "ToolbarWindow323")
    ControlDisable("classname=Shell_TrayWnd", "", "Button1")
    WinSetState("Program Manager", "", @SW_HIDE)
    WinSetState("classname=Progman", "", @SW_DISABLE)
    WinSetState("DV2ControlHost", "", @SW_HIDE)
    WinMinimizeAll()
    ControlSetText("classname=Shell_TrayWnd", "", "Button1", "*V*")
    WinSetState("Classname=Shell_TrayWnd", "", @SW_HIDE)
EndFunc ;==>SECURE
Func CAMERA()
    Sleep(250)
    Beep(500, 2500)
    MsgBox(0, "iLock Break-In", "Break-In Attemps Exceeded. Warning Issued." & @CRLF & "Please See Admin Immediatly For Instructions.", 10)
    WinMinimizeAll()
    $PHOTO = $PHOTO + 20
    $CAMERA = GUICreate("TAKING PHOTO", 40, 35, -1, -1, $WS_POPUP)
    GUICtrlCreateGroup("", 5, 0, 30, 30)
    $SNAP = GUICtrlCreateRadio("", 14, 12, 12, 12)
    GUISetState()
    Sleep(300)
    GUICtrlSetState($SNAP, $GUI_CHECKED)
    SoundPlay(@WindowsDir & "\Media\Windows XP Balloon.wav", 1)
    Sleep(200)
    GUICtrlSetState($SNAP, $GUI_UNCHECKED)
    Sleep(500)
    GUIDelete($CAMERA)
    WinMinimizeAll()
    WinSetOnTop(" *VAULTER*", "", 1)
    ProgressOn(" *VAULTER*", "UPLOADING PHOTO TO VAULT NET", "0 PERCENT")
    For $i = 10 To 100 Step 10
        Sleep(500)
        ProgressSet($i, $i & " PERCENT")
    Next
    _FileWriteLog(@DesktopDir & "\Vault.lock", "***Picture Capture/Over The Limit!*** " & $ATTEMPT)
    ProgressSet(100, "DONE", "COMPLETE")
    Sleep(500)
    ProgressOff()
    WinMinimizeAll()
    WinSetOnTop(" *VAULTER*", "", 1)
EndFunc ;==>CAMERA
Func REPORT()
    WinMinimizeAll()
    ProgressOn(" iLock", "SAVING TO FILE", "0 PERCENT")
    For $i = 10 To 100 Step 10
        Sleep(50)
        ProgressSet($i, $i & " PERCENT")
    Next
    ProgressSet(100, "DONE", "COMPLETE")
    WinMinimizeAll()
    Sleep(500)
    ProgressOff()
EndFunc ;==>REPORT

At the moment...im tring to edit this code to work...so that ill upload it somewhere...use Inetget...to download it...then write to the registry to use the unlock code to unlock it...but i must find a way to run the program without asking for a password to lock it...but...hope it helps...

-Swift

Edit...does anyone know of a way so that if the program starts up...it requires no password to lock it...it just locks?...but same features... F9 unlocks...it...etc...

Edited by Swift
Link to comment
Share on other sites

There are about two ways I know of to password-lock the computer. But first you need password protection, of course - for that, go to:

Control Panel > User Accounts > create password for your account

It would be nice if you could get automatically logged-on while booting up, but still be able to easily lock the computer (requiring the password to get back in). This wouldn't help you much unless you have a real slow computer that takes forever to log you on.

Here is the best way I know to lock the computer programmatically though:

Run("RUNDLL32 USER32.DLL,LockWorkStation")
Edited by Squirrely1

Das Häschen benutzt Radar

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...