mettre fin a un processusRésolu

Question

bonjour,

vous voudrais savoir quelle instruction permet de mettre fin a un processus.

existe-t'il un truc du genre finprocess("monexe.exe") ?

merci a vous,

alonsyl

gandalflegris007 · Accepted Answer

ouvres une fenêtre DOS et tapes juste kill : si la commande n'est pas reconnu, il faut soit que tu installes le ressource kit (tu dois pouvoir le trouver sur le site de microsoft) soit il faut que tu utilises les liens que je t'ai filé (ou d'autres src du site d'ailleurs).
Mais je suis sur qu'en épluchant les codes dispo ici, tu as de quoi t'en sortir tranquille.

Guich

gandalflegris007 · Answer

Salut alonsyl,

sous DOS, la commande KILL permet cela
> sous VB : shell("kill.exe process.exe")

Guich

alonsyl · Answer

j'ai essaye de mettre fin a un exe perso de la maniere suivante:
shell("kill.exe exeperso.exe")
ca n'a pas fonctionne (erreur d'execution 53: fichier introuvable).
quelle erreur ai-je pu commettre ?

alonsyl

gandalflegris007 · Answer

Essaies en ligne de commande juste "kill" voir s'il reconnait cette instruction.
Ce soft fait partie du ressourcekit Windows et n'est pas de base sur l'install

Guich

gandalflegris007 · Answer

Sinon, fait une recherche de "processus" sur le site.
tu trouveras plein d'exemples de code pour faire ça

http://www.vbfrance.com/code.aspx?ID=7838 & http://www.vbfrance.com/code.aspx?ID=8428 pour ne citer qu'eeux.

Ils font appel à la fonction TerminateProcess de kernel32.

Guich

alonsyl · Answer

j'ai essaye:
shell("kill exeperso.exe")
shell("kill exeperso")
shell("kill")
shell("kill.exe")
kill
kill ("exeperso.exe")
kill ("exeperso")
rien de tout cela n'a fonctionne.

je n'essaie pas kill "C:\exeperso.exe" car je connais deja les effets.

MadM@tt · Answer

Si ça peut t'aider :

Public Declare Function TerminateProcess Lib "kernel32" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long
Public Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Public Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long

' Supprime un processus
' Process : ProcessID
Public Function StopProcess(Process As Long)
    Dim hProcess As Long
    hProcess = OpenProcess(&H1, 0, Process)  ' ou &H400
    TerminateProcess hProcess, 0 ' ou 1
    CloseHandle hProcess
End Function


Par contre il te faut conaitre l'identificateur du processus (PID)
@ +
MadMatt

alonsyl · Answer

bonjour,

et comment on fait pour connaitre le PID ?

merci a vous,

alonsyl

MadM@tt · Answer

Il faut récupérer tous les processus qui s'éxecutent et comparer leurs nom avec celui que tu veux fermer.
Quand tu a trouvé le processus qui correspond, tu lui applique ce code.
Enfin tout ça c'est pas très parlant je comprend bien... J'ai pas d'exemple sous la main mais en cherchant 2-3s ça doit se trouver très facilement sur le site.
@ +
MadMatt

Mettre fin a un processus

9 réponses

Discussions similaires