Help Me, Please with code ProcessClose on Windows

[triviet4]

I have code ProcessClose 1 File when press Hot key

HotKeySet("{F6}","exitt")

Do
ToolTip("test",0,0)
Until 0

Func exitt()
ProcessClose ("File.exe")
EndFunc

Please, help me, with code ProcessClose all File running on windows but may except for 1,2 Process when press Hot key

 

[water]

Welcome to AutoIt and the forum!
Please have a look at function ProcessList. Loop through the array and close all processes but the 1, 2.

[triviet4]

i cann't unknown ProcessList. At a time Turn on Computer, i will be different ProcessList

As well as With shorcut:

taskkill /F /FI "USERNAME eq user_name" /FI "IMAGENAME ne explorer.exe" /FI "IMAGENAME ne dwm.exe"

 

Edited November 17, 2015 by triviet4

[triviet4]

I found this code. It's wrong or right + How add Hotkey

Local $sProcessList = ProcessList()
For $i=0 To UBound($sProcessList)-1
    CloseProcess($sProcessList[$i][0])
Next

Func CloseProcess($sProcess)
    Local $sListProcessSystem=StringSplit("smss.exe|csrss.exe|wininit.exe|services.exe|lsass.exe|svchost.exe|spoolsv.exe|MsMpEng.exe|NisSrv.exe|dasHost.exe|SearchIndexer.exe|OSPPSVC.EXE|audiodg.exe|winlogon.exe|dwm.exe|taskeng.exe|sihost.exe|taskhostw.exe|RuntimeBroker.exe|ShellExperienceHost.exe|SearchUI.exe|SettingSyncHost.exe|SearchProtocolHost.exe|WUDFHost.exe|InstallAgent.exe|WmiPrvSE.exe|HxTsr.exe|SearchFilterHost.exe|rundll32.exe|", "|")
    For $x=0 To UBound($sListProcessSystem)-1
        If Not StringInStr($sProcess,$sListProcessSystem[$x]) Then
            ConsoleWrite("ProcessClose: " & $sProcess&@CRLF)
            ProcessClose($sProcess)
        EndIf
    Next
EndFunc

 

Edited November 17, 2015 by triviet4

[Trong]

Opt("TrayAutoPause", 0)

HotKeySet("{F6}", "CloseProcess")
HotKeySet("{F7}", "_Exit")

While 1
    Sleep(10)
    ToolTip("F6: CloseProcess - F7: Exit", @DesktopWidth / 2, @DesktopHeight / 2, "", 2, 2)
WEnd

Func CloseProcess()
    Local $sProcessList = ProcessList()
    For $i = 0 To UBound($sProcessList) - 1
        _CloseProcess($sProcessList[$i][0])
    Next
EndFunc   ;==>CloseProcess

Func _CloseProcess($sProcess)
    Local $sListProcessSystem = StringSplit(@ScriptName & "|AutoIt3.exe|SciTE.exe|dllhost.exe|UniKey.exe|explorer.exe|smss.exe|csrss.exe|wininit.exe|services.exe|lsass.exe|svchost.exe|spoolsv.exe|MsMpEng.exe|NisSrv.exe|dasHost.exe|SearchIndexer.exe|OSPPSVC.EXE|audiodg.exe|winlogon.exe|dwm.exe|taskeng.exe|sihost.exe|taskhostw.exe|RuntimeBroker.exe|ShellExperienceHost.exe|SearchUI.exe|SettingSyncHost.exe|SearchProtocolHost.exe|WUDFHost.exe|InstallAgent.exe|WmiPrvSE.exe|HxTsr.exe|SearchFilterHost.exe|rundll32.exe", "|")
    Local $sTrue = False
    For $x = 0 To UBound($sListProcessSystem) - 1
        If $sProcess = $sListProcessSystem[$x] Then $sTrue = True
    Next
    If Not $sTrue Then
        ConsoleWrite("ProcessClose: " & $sProcess & @CRLF)
        ToolTip("ProcessClose: " & $sProcess, @DesktopWidth / 2, @DesktopHeight / 2, "", 2, 2)
        ProcessClose($sProcess)
    EndIf
EndFunc   ;==>_CloseProcess

Func _Exit()
    Exit
EndFunc   ;==>_Exit

 

[triviet4]

Code of "Trong" is good. Thank's very much

But when i play game CrossFire, FPS game fullscreen, code didn't

I have Alt+tab, code can do that (ProcessClose game)

How fix it. Help me, Please

Edited November 17, 2015 by triviet4

[Trong]

Try running with Adminstrator.
The game was too big I can not download and run the test. (Maximum download speed is 400KB/s)

#RequireAdmin