TERMINER UN PROCESSUS DU SYSTÈME
MadM@tt
Messages postés
2167
Date d'inscription
mardi 11 novembre 2003
Statut
Membre
Dernière intervention
16 juillet 2009
-
30 juin 2004 à 22:08
cs_DAHOKHAN Messages postés 20 Date d'inscription mercredi 19 octobre 2005 Statut Membre Dernière intervention 12 décembre 2005 - 8 déc. 2005 à 14:51
cs_DAHOKHAN Messages postés 20 Date d'inscription mercredi 19 octobre 2005 Statut Membre Dernière intervention 12 décembre 2005 - 8 déc. 2005 à 14:51
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/24157-terminer-un-processus-du-systeme
https://codes-sources.commentcamarche.net/source/24157-terminer-un-processus-du-systeme
8 déc. 2005 à 14:51
est ce que tu peu m'aider svp thk!
6 juil. 2004 à 18:08
3 juil. 2004 à 12:42
2 juil. 2004 à 19:51
et tu as windows XP ?
2 juil. 2004 à 19:42
2 juil. 2004 à 19:39
ça peut être pas mal...
2 juil. 2004 à 13:43
par contre j'y ai vu un commentaire intéressant, tout mon prog peut se résumer autrement par une simple ligne :
Shell "tskill Babylon.exe"
lol donc voilà tout ca pour peu de chose quoi ! mais ca m'a bien fait avancer sur les API merci à tous.
1 juil. 2004 à 21:19
1 juil. 2004 à 14:02
ce mot donne souvent une indication (plus ou moins claire) sur ce que sa présence indique a la fonction...
OpenProcess(1, 0, Processus.th32ProcessID)
OpenProcess(PROCESS_TERMINATE , 0, Processus.th32ProcessID)
la deuxième ligne est tout de même plus claire....
enfin, ca n'etait pas une critique... il peu arriver de s'inspirer de codes trouvés a gauche a droite.... l'essentiel est d'en décortiquer le fonctionnement et de le comprendre.... faire un code qui fonctionne comme on le veux n'est qu'une première étape... ;)
1 juil. 2004 à 13:24
mais tu as raison je ne maitrise pas les API et j'utilise des portions de code que j'ai trouvées.
1 juil. 2004 à 13:20
tu utilises :
Capture = CreateToolhelp32Snapshot(2, 0)
que fait ce '2' ?? pourquoi ne pas avoir mis 5 ou 6 ?
il correspond en fait a la constante
Const TH32CS_SNAPPROCESS = &H2
qui permet d'indiquer que l'on veux lister les Process
l'utilisation des constantes nommées aident la compréhension du code....
d'autre part, je trouve quelques peu étrange ton test :
It Left$(Processus.szExeFile, IIf(InStr(1, Processus.szExeFile, Chr$(0)) > 0, InStr(1, Processus.szExeFile, Chr$(0)) - 1, 0)) = "Babylon.exe" Then
En effet, tu considère en faisant ca que la chaine Processus.szExeFile pourrait ne pas contenir de \0.... c'est un raisonnement erroné !
Left$(strString, instr ( strstring , vbnullchar)-1) aurait pu suffir...
dans ton cas, tu aurais même pu faire :
'# au debut de ta procedure
Dim Length As Integer
Length = Len("Babylon.exe")
'# Comme test :
If Left$(Processus.szExeFile, Length) = "Babylon.exe" Then
enfin, pour finir sur l'utilisation hazardeuse des API, encore une exemple :
OpenProcess(1, 0, Processus.th32ProcessID)
a quoi correspond la valeur 1 ?
à la constante
Const PROCESS_TERMINATE = &h1
bref, ton code fonctionne (attention a l'OS minimum) mais n'est pas clair. J'espere qu'il l'est au moins pour toi ;)
1 juil. 2004 à 10:39
1 juil. 2004 à 00:36
1 juil. 2004 à 00:34
30 juin 2004 à 22:08