Disable - Enable Windows Task Manager(Win XP - Vista - 7)

[RASHAD]

Run as admin

Code: Select all

Procedure CreateKey(topKey, sKeyName.s, ComputerName.s) 
    If ComputerName = "" 
        GetHandle = RegCreateKeyEx_(topKey, sKeyName, 0, 0, #REG_OPTION_NON_VOLATILE, #KEY_ALL_ACCESS, @lpSecurityAttributes, @hNewKey, @GetHandle) 
    Else 
        lReturnCode = RegConnectRegistry_(ComputerName, topKey, @lhRemoteRegistry) 
        GetHandle = RegCreateKeyEx_(lhRemoteRegistry, sKeyName, 0, 0, #REG_OPTION_NON_VOLATILE, #KEY_ALL_ACCESS, @lpSecurityAttributes, @hNewKey, @GetHandle) 
    EndIf 

    If GetHandle = #ERROR_SUCCESS 
        GetHandle = RegCloseKey_(hNewKey) 
        CreateKey = 1 
    Else 
        CreateKey = 0 
    EndIf 
    ProcedureReturn CreateKey 
  EndProcedure
  
  Procedure SetValue(topKey.l, sKeyName.s, sValueName.s, vValue.s, lType.l, ComputerName.s) 
 
  If ComputerName = "" 
    GetHandle = RegOpenKeyEx_(topKey, sKeyName, 0, #KEY_ALL_ACCESS, @hKey) 
  Else 
    lReturnCode = RegConnectRegistry_(ComputerName, topKey, @lhRemoteRegistry) 
    GetHandle = RegOpenKeyEx_(lhRemoteRegistry, sKeyName, 0, #KEY_ALL_ACCESS, @hKey) 
  EndIf 

   If GetHandle = #ERROR_SUCCESS     
    Select lType 
      Case #REG_SZ 
        GetHandle = RegSetValueEx_(hkey, sValueName, 0, #REG_SZ, @vValue, Len(vValue) + 1) 
      Case #REG_DWORD 
        lValue = Val(vValue) 
        GetHandle = RegSetValueEx_(hKey, sValueName, 0, #REG_DWORD, @lValue, 4) 
    EndSelect 
      
    RegCloseKey_(hkey) 
    SetValue = 1 
   Else 
    RegCloseKey_(hKey)
    SetValue = 0 
  EndIf
  ProcedureReturn SetValue
EndProcedure

Procedure DeleteKey(topKey.l, sKeyName.s, ComputerName.s) 
   
    If ComputerName = "" 
        GetHandle = RegDeleteKey_(topKey, @sKeyName) 
    Else 
        lReturnCode = RegConnectRegistry_(ComputerName, topKey, @lhRemoteRegistry) 
        GetHandle = RegDeleteKey_(lhRemoteRegistry, @sKeyName) 
    EndIf 

    If GetHandle = #ERROR_SUCCESS 
        DeleteKey = 1 
    Else 
        DeleteKey = 0 
    EndIf 
    ProcedureReturn DeleteKey 
EndProcedure

sTopKey.l = #HKEY_CURRENT_USER 
sKeyName.s = "SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System"

;**********************( Disable Task Manager )*****************************
;
CreateKey(sTopKey, sKeyName, "")
SetValue(sTopKey, sKeyName, "DisableTaskMgr", "01", #REG_DWORD, "")

;**********************(Enable Task Manager )*******************************

;DeleteKey(sTopKey, sKeyName, "") 

[Mistrel]

This can be done through the group policy editor as well. However, your code may be useful for XP Home which does not support group policies.

[RASHAD]

Hi Mistrel
This code to disable Ctrl-Alt-Del Task switching temporary from your program and enable it back
before exit
A small tip I hope that it will be used legally
And thank you for "XP Home does not support group policies" I did not know that before

Have a good day

[Alireza]

Thanks, on 7 os was OK

[Mistrel]

If you set this in the registry and your program crashes.. you've now just locked the computer out of the task manager.

[RASHAD]

The programmer must be smart enough to handle such cases
I faced at least 2 programs that Win 7 could not handle even with log off/log on
From start why someone want to disable the Task Manger?
Frankly speaking
I do not know.
The problem is you can even disable (log off/log on - User Switching - Change Password...etc.)
and all are designed by Microsoft
M$ must have a good reason for that
You know ,there is a code to disable Ctrl-Alt-Del for Win XP ,Vista and 7 but I will not post it
because I do not find any good reason for that, though the net is full of that request

[PB]

> If you set this in the registry and your program crashes..
> you've now just locked the computer out of the task manager.

Not really. There's a million Task Manager replacements for download.
Locking the Windows one like this is, quite frankly, a useless gesture.
It takes less than a minute to find, download and run another one.
DTaskManager is a good free one: http://dimio.altervista.org/eng/

[Flower]

> If you set this in the registry and your program crashes..
> you've now just locked the computer out of the task manager.

Not really. There's a million Task Manager replacements for download.
Locking the Windows one like this is, quite frankly, a useless gesture.
It takes less than a minute to find, download and run another one.
DTaskManager is a good free one: http://dimio.altervista.org/eng/

And the most famous Process Explorer.

[Kwai chang caine]

Thanks RASHAD , good on XP PRO SP3

[Flower]

Code: Select all

Define buffer.s
buffer = Space(#MAX_PATH)
GetWindowsDirectory_(@buffer, #MAX_PATH)
buffer + "\System32\Taskmgr.exe"
CreateFile_(@buffer, #GENERIC_READ, #Null, #Null, #OPEN_EXISTING, #FILE_ATTRIBUTE_NORMAL, #Null)
Repeat
      Sleep_(10)      
ForEver

How about this one?

[Baldrick]

How about this one?

Haven't checked any of the other snippets here, but with yours, if you have the taskmanager set to minimize to systray ( which I have mine set to do at computer startup ) then all you do is click on the tray icon & you have a task manager....