Process Suspender

christo76 · Dec 24, 2010

Bonjour à tous ! Aujourd'hui je vais vous présenter le Process Suspender que j'ai créer moi même.

Il est très simple à utiliser.

Virus Total :

Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!

Screen :

Utilisation :

Très très simple :
Mettez le nom du Processus sur lequel vous voulez agir.
Cliquez sur le bouton "Suspend" pour suspendre votre programme.
Cliquez sur le bouton "Resume" pour le résumer (reprendre).
Cliquez sur le bouton "Kill" pour le tuer (fermer).
Un message vous dira si votre processus a été suspendu, résumé ou killé.

Si vous avez des questions, MP moi.

Téléchargement : Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!

Si vous aimez ce Process Suspender, cliquez sur "merci" s'il vous plaît.

tageule94 · Dec 24, 2010

Merci Christo sa sert toujours !

christo76 · Dec 24, 2010

Derien ;)

[A]byss · Dec 24, 2010

Ty et c'est pour n'importe quel jeu ou autre?

christo76 · Dec 24, 2010

Tout sauf S4 League je pense, à cause des anti-cheats...

hackuloss · Dec 24, 2010

salut le gestionnaire des taches le fait très bien aussi ;)

Evaelis · Dec 24, 2010

Il ne freeze pas mais Process Explorer le fais
Je te conseille de mettre une liste des processus

christo76 · Dec 24, 2010

J'ai voulu le faire, mais je ne sais pas comment le faire ^^

n0way · Dec 24, 2010

Coucou Christo76,

Voici la source du mien que je viens de coder :
J'espere que ceci t'aidera à comprendre comment t'y prendre.

Je ne sais pas quel language tu avais utilisés, mais voici ici en AutoitIt

PHP:

;- Author : n0way
;- Name of the project : Process Suspender
;- Date : 24/12/12 (what a shame to code this day)

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Include <GuiComboBox.au3>

Func _ProcessSuspend($process)
$processid = ProcessExists($process)
If $processid Then
    $ai_Handle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1f0fff, 'int', False, 'int', $processid)
    $i_sucess = DllCall("ntdll.dll","int","NtSuspendProcess","int",$ai_Handle[0])
    DllCall('kernel32.dll', 'ptr', 'CloseHandle', 'ptr', $ai_Handle)
    If IsArray($i_sucess) Then
        Return 1
    Else
        SetError(1)
        Return 0
    Endif
Else
    SetError(2)
    Return 0
Endif
EndFunc

Func _ProcessResume($process)
$processid = ProcessExists($process)
If $processid Then
    $ai_Handle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1f0fff, 'int', False, 'int', $processid)
    $i_sucess = DllCall("ntdll.dll","int","NtResumeProcess","int",$ai_Handle[0])
    DllCall('kernel32.dll', 'ptr', 'CloseHandle', 'ptr', $ai_Handle)
    If IsArray($i_sucess) Then
        Return 1
    Else
        SetError(1)
        Return 0
    Endif
Else
    SetError(2)
    Return 0
Endif
EndFunc



Global $Form1 = GUICreate("Process Suspender ", 578, 123, 192, 124)
GUISetIcon("\icone\devico.ico")


Global $Label1 = GUICtrlCreateLabel("Process Name : ", 6, 18, 99, 18)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
Global $Combo1 = GUICtrlCreateCombo("", 106, 16, 193, 25)
Global $Button1 = GUICtrlCreateButton("Suspend", 312, 16, 75, 25, $WS_GROUP)
Global $Button2 = GUICtrlCreateButton("Resume", 400, 16, 75, 25, $WS_GROUP)
Global $Button3 = GUICtrlCreateButton("Kill", 488, 16, 75, 25, $WS_GROUP)

Global $Label2 = GUICtrlCreateLabel("Process Name : ", 6, 82, 99, 18)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
Global $Combo2 = GUICtrlCreateCombo("", 106, 48, 193, 25)
Global $Button4 = GUICtrlCreateButton("Suspend", 312, 48, 75, 25, $WS_GROUP)
Global $Button5 = GUICtrlCreateButton("Resume", 400, 48, 75, 25, $WS_GROUP)
Global $Button6 = GUICtrlCreateButton("Kill", 488, 48, 75, 25, $WS_GROUP)

Global $Label3 = GUICtrlCreateLabel("Process Name : ", 6, 50, 99, 18)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
Global $Combo3 = GUICtrlCreateCombo("", 106, 80, 193, 25)
Global $Button7 = GUICtrlCreateButton("Suspend", 312, 80, 75, 25, $WS_GROUP)
Global $Button8 = GUICtrlCreateButton("Resume", 400, 80, 75, 25, $WS_GROUP)
Global $Button9 = GUICtrlCreateButton("Kill", 488, 80, 75, 25, $WS_GROUP)

GUISetState(@SW_SHOW)

Func GetProcessList()
	$proc = ProcessList()

	For $i = 2 To $proc[0][0]
		_GUICtrlComboBox_AddString($combo1, $proc[$i][0])
		_GUICtrlComboBox_AddString($combo2, $proc[$i][0])
		_GUICtrlComboBox_AddString($combo3, $proc[$i][0])
	Next

EndFunc

GetProcessList()

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $button1
			_ProcessSuspend(GuiCTRLRead($combo1))
		Case $Button2
			_ProcessResume(GuiCtrlRead($combo1))
		Case $Button3
			ProcessClose(GuiCtrlRead($combo1))

		Case $button4
			_ProcessSuspend(GuiCTRLRead($combo2))
		Case $Button5
			_ProcessResume(GuiCtrlRead($combo2))
		Case $Button6
			ProcessClose(GuiCtrlRead($combo2))

		Case $button7
			_ProcessSuspend(GuiCTRLRead($combo3))
		Case $Button8
			_ProcessResume(GuiCtrlRead($combo3))
		Case $Button9
			ProcessClose(GuiCtrlRead($combo3))

EndSwitch

WEnd

un Screen :

Et vous pouvez télécharger ici le pack "source + executable" : Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!

Cordialement,
n0way

christo76 · Dec 24, 2010

Merci c'est sympa, je vais regarder ça tranquillement et essayer de comprendre =)

n0way · Dec 25, 2010

c'est normal ;)

σνєянα¢к² · Dec 25, 2010

Merci Christo , bonne continuation :D .

Guest 10587 · Dec 25, 2010

Pas mal !

J'aurais même rajouté un petit truc comme ça :

;- Author : Christo
;- Name of the project : Process Suspender
;- Date : 24/12/12

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Include <GuiComboBox.au3>

Func _ProcessSuspend($process)
$processid = ProcessExists($process)
If $processid Then
$ai_Handle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1f0fff, 'int', False, 'int', $processid)
$i_sucess = DllCall("ntdll.dll","int","NtSuspendProcess","int",$ai_Handle[0])
DllCall('kernel32.dll', 'ptr', 'CloseHandle', 'ptr', $ai_Handle)
If IsArray($i_sucess) Then
Return 1
Else
SetError(1)
Return 0
Endif
Else
SetError(2)
Return 0
Endif
EndFunc

Func _ProcessResume($process)
$processid = ProcessExists($process)
If $processid Then
$ai_Handle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1f0fff, 'int', False, 'int', $processid)
$i_sucess = DllCall("ntdll.dll","int","NtResumeProcess","int",$ai_Handle[0])
DllCall('kernel32.dll', 'ptr', 'CloseHandle', 'ptr', $ai_Handle)
If IsArray($i_sucess) Then
Return 1
Else
SetError(1)
Return 0
Endif
Else
SetError(2)
Return 0
Endif
EndFunc

Global $Form1 = GUICreate("Process Suspender ", 578, 123, 192, 124)
GUISetIcon("\icone\devico.ico")

Global $Label1 = GUICtrlCreateLabel("Process Name : ", 6, 18, 99, 18)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
Global $Combo1 = GUICtrlCreateCombo("", 106, 16, 193, 25)
Global $Button1 = GUICtrlCreateButton("Suspend", 312, 16, 75, 25, $WS_GROUP)
Global $Button2 = GUICtrlCreateButton("Resume", 400, 16, 75, 25, $WS_GROUP)
Global $Button3 = GUICtrlCreateButton("Kill", 488, 16, 75, 25, $WS_GROUP)

Global $Label2 = GUICtrlCreateLabel("Process Name : ", 6, 82, 99, 18)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
Global $Combo2 = GUICtrlCreateCombo("", 106, 48, 193, 25)
Global $Button4 = GUICtrlCreateButton("Suspend", 312, 48, 75, 25, $WS_GROUP)
Global $Button5 = GUICtrlCreateButton("Resume", 400, 48, 75, 25, $WS_GROUP)
Global $Button6 = GUICtrlCreateButton("Kill", 488, 48, 75, 25, $WS_GROUP)

Global $Label3 = GUICtrlCreateLabel("Process Name : ", 6, 50, 99, 18)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
Global $Combo3 = GUICtrlCreateCombo("", 106, 80, 193, 25)
Global $Button7 = GUICtrlCreateButton("Suspend", 312, 80, 75, 25, $WS_GROUP)
Global $Button8 = GUICtrlCreateButton("Resume", 400, 80, 75, 25, $WS_GROUP)
Global $Button9 = GUICtrlCreateButton("Kill", 488, 80, 75, 25, $WS_GROUP)
$Menu_file = GUICtrlCreateMenu("&File")
$Menu_about = GUICtrlCreateMenuItem("About", $Menu_file)
$Menu_exit = GUICtrlCreateMenuItem("Exit", $Menu_file)
GUISetState(@SW_SHOW)

Func GetProcessList()
$proc = ProcessList()

For $i = 2 To $proc[0][0]
_GUICtrlComboBox_AddString($combo1, $proc[$i][0])
_GUICtrlComboBox_AddString($combo2, $proc[$i][0])
_GUICtrlComboBox_AddString($combo3, $proc[$i][0])
Next

EndFunc

GetProcessList()

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button1
_ProcessSuspend(GuiCTRLRead($combo1))
Case $Button2
_ProcessResume(GuiCtrlRead($combo1))
Case $Button3
ProcessClose(GuiCtrlRead($combo1))

Case $button4
_ProcessSuspend(GuiCTRLRead($combo2))
Case $Button5
_ProcessResume(GuiCtrlRead($combo2))
Case $Button6
ProcessClose(GuiCtrlRead($combo2))

Case $button7
_ProcessSuspend(GuiCTRLRead($combo3))
Case $Button8
_ProcessResume(GuiCtrlRead($combo3))
Case $Button9
ProcessClose(GuiCtrlRead($combo3))
Case $Menu_about
MsgBox(64, "About", "Product name: Process Suspender by Christo , Microsoft on t'emmerde..." & @CRLF & "Author: Christo" & @CRLF & "Version: 1.0" & @CRLF & "" & @CRLF & "© Copyright 2011. All rights reserved.")
Case $Menu_exit
Exit
EndSwitch

WEnd

Juste pour qu'on voie l'auteur et les infos ^^ et un petit "Microsoft on t'emmerde" comme Superman le met si bien ;)

Maintenant j'ai un problème , quand je le compile en exécutable ,
la liste des process ne veut pas s'afficher !

Alors que en .au3 elle s'affiche... La je ne suis plus , quelqu'un a une idée ? ^^

n0way · Dec 25, 2010

Pas logique du tout. Aucune idée

Terreur1 · Dec 25, 2010

Il est bizzare ton programme, pour voir le nom des processus il faut ouvrir le gestionnaire de tache et celui ci fait les mêmes options ^^'

Desolé mais je voit pas trop l'utilité =/

christo76 · Dec 29, 2010

Le gestionnaire de tâches ne fais pas ces options pour tout le monde, c'est pour cela que j'ai décidé d'en créer un et de le poster.

Guest 10587 · Dec 29, 2010

C'est vraiment bien oui,
Mais j'aurai aimer savoir si chez toi christo ou N0way , quand vous le compilez il affiche la liste des process.
J'ai déjà réessayé et regardé si j'avais pas fais de conneries plusieurs fois , mais non , elle s'affiche toujours en .au3 et non en exécutable...

Ca me perturbe :hap:

n0way · Dec 29, 2010

Euh moi cela se compile, et sans problème ...

ModernLobby · Dec 29, 2010

Toujours d'aussi bon programme Christo xD Je le prend

christo76 · Dec 30, 2010

xD mercii =) ça fais plaisir !

Evaelis · Dec 30, 2010

Bah Procexp est bien aussi
Ajoute liste programme

Process Suspender

Publicités

Users Who Are Viewing This Thread (Total: 0, Members: 0, Guests: 0)

More options

christo76

Attachments

tageule94

Membre Banni

christo76

[A]byss

Unsere Rettung

christo76

hackuloss

Membre

Evaelis

La Voix de la Sagesse

christo76

n0way

Membre actif

christo76

n0way

Membre actif

σνєянα¢к²

Membre Banni

Guest 10587

n0way

Membre actif

Terreur1

christo76

Guest 10587

n0way

Membre actif

ModernLobby

Membre d'Honneur

christo76

Evaelis

La Voix de la Sagesse