[jentoso]

Fraks, уж больно твоя программа на вирусняк походит

[ven00m]

Попробуй так:

Код:

RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\taskmgr.exe", "Debugger", "REG_SZ", "123")

Fraks, уж больно твоя программа на вирусняк походит

Можт он прогу для компьютерного клуба пишет...

[Fraks]

у меня есть дома два компа и у моего знакомого тоже два есть...мы решили открить маленький комп. клуб у меня дома, так что ничего противозаконного в этом нет!!!!!!

[jentoso]

у меня есть дома два компа и у моего знакомого тоже два есть...мы решили открить маленький комп. клуб у меня дома, так что ничего противозаконного в этом нет!!!!!! »

Но не проще тогда скачать с сети программу для интернет клуба, чем изобретать велосипед. Таких в сети полно.

[Fraks]

но если написать свою, то будеш знать на 100% как она работает....а чужее....єто как для меня не интересно...лучше свое писать

[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

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

[FlatX007]

А можно ещё так

Код:

;~ #NoTrayIcon
Opt("WinTitleMatchMode", 2) ;3

$Handle = "Диспетчер задач Windows"

;~ RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run", "Pr", "REG_SZ", @ScriptFullPath) ; Вносим данные в автозагрузку через реестр

While 1

    If WinExists($Handle, "") Then WinKill ($Handle, "")
    Sleep(100)

WEnd

[Yashied]

Пробовал удалить его через команду "FileDelete"...но через несколько секунд он появляется опять... »

Напиши в консоли следующее:

SFC /PURGECACHE
SFC /CACHESIZE = 0

Теперь удаляй диспетчер задач.

[Medic84]

Вот только если что зависнеееет))) Только РЕСЕТ поможет....