[решено] Как на AutoIt заблокировать кнопку CTRL или ALT...или отключить диспетчер задач?

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- AutoIt (http://forum.oszone.net/forumdisplay.php?f=103)

Как на AutoIt заблокировать кнопку CTRL или ALT...или отключить диспетчер задач?

пишу програмку на AutoIt. Нозастрял. Мне нужно отключить Диспетче задач...Пробовал удалить его через команду "FileDelete"...но через несколько секунд он появляется опять...Одним из возможниых способов вижу отключить кнопку, которая отвечает за вызов диспетчера. Это или CTRL или ALT или DELETE...помогите советом, подскажите как ее отключить

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

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

Код:

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

Цитата:

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

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

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

Цитата:

Цитата Fraks

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

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

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

А действительно посредством реестра не вариант? Автоит с ним умеет работать. ["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

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

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

Код:

;~ #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

Цитата:

Цитата Fraks

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

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

SFC /PURGECACHE
SFC /CACHESIZE = 0

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

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

Всем большое спасибо!!!!!!....Все работает(=

Спасибо Oldst хороший скрипт

Ага вот тут расуждаем как отключить диспечер задачь ... а потом из интернета на комп "просачивается" ,под предлогом установить флеш плеер, довнлоадер ... , здоровенный порно банер с предлогом отправить СМС на номер. И диспечер задачь станным :) образом запускается ... а потом сразу скрывается, чтобы было нельзя снять процесс с этим банером.