[Oldst]

А действительно посредством реестра не вариант? Автоит с ним умеет работать. ["HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System"] ключ:"DisableTaskMgr" (DWORD) 1=отключить диспетчер, 0=включить

Код:

AutoItSetOption ( "TrayIconHide",1)
GUICreate('lock-unlock',250,150)
$chb_reg=GUICtrlCreateCheckbox('реестр',10,20,150,20)
$chb_taskmgr=GUICtrlCreateCheckbox('диспетчер задач',10,50,150,20)
$btn_lock=GUICtrlCreateButton('Заблокировать',20,100,90,30)
$btn_unlock=GUICtrlCreateButton('разблокировать',140,100,90,30)
GUISetState()
Do
$msg=GUIGetMsg()
Select
	Case $msg=$btn_lock
	If GUICtrlRead($chb_reg)=1 Then
		$rw1=RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableRegistryTools", "REG_DWORD","1") 
		If $rw1=1 Then
			GUICtrlCreateLabel('lock',170,20,60,20)
		Else
			GUICtrlCreateLabel('error',170,20,60,20)
		EndIf
	EndIf
	If GUICtrlRead($chb_taskmgr)=1 Then
		$rw2=RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD","1")
		If $rw2=1 Then
			GUICtrlCreateLabel('lock',170,50,60,20)
		Else
			GUICtrlCreateLabel('error',170,50,60,20)
		EndIf
	EndIf
	Case $msg=$btn_unlock
	If GUICtrlRead($chb_reg)=1 Then
		$rw1=RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableRegistryTools", "REG_DWORD","0")
		If $rw1=1 Then
			GUICtrlCreateLabel('unlock',170,20,60,20)
		Else
			GUICtrlCreateLabel('error',170,20,60,20)
		EndIf		
	EndIf
	If GUICtrlRead($chb_taskmgr)=1 Then
		$rw2=RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD","0")
		If $rw2=1 Then
			GUICtrlCreateLabel('unlock',170,50,60,20)
		Else
			GUICtrlCreateLabel('error',170,50,60,20)
		EndIf
	EndIf
EndSelect	
Until $msg=-3

Вот тебе готовый код , если хочешь...