Savoir si une application est en cours d'exécution??

Version imprimable

23/03/2006, 08h38
Davidvb6

Savoir si une application est en cours d'exécution??

Boujour, je cherche à savoir s'il est possible de récupérer l'état (statut) d'une application.
En effet, je souhaite tuer mon appli si elle est mode "Ne répond pas".
Si qq'un peut m'aider, merci.

Merci pour le lien, ça m'est utile.
Mais je n'arrive pas à connaître l'état de l'appli quand je fais:
oproc.ExecutionState ou
oproc.Status

Ca me renvoie une valeur nulle alors que mon appli tourne.
As-tu une suggestion??
Code:

1 2 3 4 5 6 7 8 9 10 11 Private Sub Form_Load() Dim svc As Object Dim oproc Set svc = GetObject("winmgmts:root\cimv2") squery = "select * from win32_process where name='Test.EXE'" For Each oproc In svc.execquery(squery) MsgBox "" & oproc.ExecutionState Next Set svc = Nothing End Sub

Ben...
Code:

1 2 3 4 5 6 7 8 9 10 Private Sub Form_Load() Dim svc As Object Dim oproc Set svc = GetObject("winmgmts:root\cimv2") squery = "select * from win32_process where name='TEST.EXE'" For Each oproc In svc.execquery(squery) oproc.Terminate Next Set svc = Nothing End Sub
te "zigouillera", si elle est ouverte, l'appli TEST.EXE
La requête qui est faite l'est précisément sur TEST.EXE... et aucune autre appli...
Essaye et tu constateras !
Il faut qu'il soit clair dans ton esprit que TEST.EXE doit exister (ne pas tester, donc, en lançant, par le Run ou Start, TEST.VPB mais créer TEST.EXE, lancer TEST.EXE et tester alors...) :wink:
Je viens de tester chez moi et tout marche sans problème.
PS : lorsque tu y seras parvenu, remercie ThierryAIM qui nous a "passé ce petit bout de code il y a quelques jours à peine ...

23/03/2006, 12h00
Davidvb6

J'ai testé et je suis d'accord avec toi ça marche si on veut tuer n'importe
quelle application.
Mais moi je veut tuer une application qui ne répond plus et donc je veux savoir son état (En cours d'exécution, ou Ne répond pas).
D'après ce bout de code, on tue Test.exe quelque soit son état.
23/03/2006, 12h34
ThierryAIM

J'adore :

Citation:

Envoyé par MSDN

ExecutionState
Data type: uint16
Access type: Read-only

This property is not implemented and does not get populated for any instance of this class. This property is always NULL.

Status
Data type: string
Access type: Read-only

This property is not implemented and does not get populated for any instance of this class. It is always NUL

Merci m'sieur µsoft :?
23/03/2006, 13h19
Davidvb6

Ok, c'est génial donc y'a pas moyen de récupérer l'état d'une application qui tourne.
En VB.net il existe la classe Process avec une méthode Responding.
N'y a-t-il pas un moyen en vb6.
23/03/2006, 13h20
jmfmarques

Ouais et Ouille !
Après avoir (comme à l'accoutumée) foncé la tête la première dans le brouillard et (toujours comme à l'accoutumée) été victime de nombreux hématomes en me heurtant à 2 ou 3 murs (parmi lesquels le .status que j'ai essayé :oops: sans, comme Thierry, regarder ce qu'en disait MSDN), j'en suis arrivé à me contenter d'une réflexion philosophique (bosses et hématomes aidant...) :
S'il était possible de dénoncer l'état bloqué d'une application ouverte, Windows aurait certes profité de cette aptitude pour dénoncer à son client, sans plus attendre, le problème...
Or, Sir Bill ne fait connaître l'existence de cette épine que lorsque son client tente de fermer une application et que ses "ouvriers" n'y parviennent pas !
Sir Bill ne saurait ainsi qu'un processus ne répond plus que lorsque son client tente en vain de le fermer... et... si le processus peut être fermé, ma foi, il... le ferme !...
Bien, mais voilà : Sir Davidvb6 ne veut quant à lui pas que l'on ferme si le processus est encore capable de répondre... Gênant, gênant tout çà ... Comment tenter de fermer .... sans fermer .... pour voir si l'on peut fermer ?...
Je me mets donc à genoux et ... abandonne (trop de bosses déjà)... :evil:
23/03/2006, 13h27
ThierryAIM

Pour votre information :

Citation:

Class Win32_Process: CIM_Process
{
string Caption;
string CommandLine;
string CreationClassName;
datetime CreationDate;
string CSCreationClassName;
string CSName;
string Description;
string ExecutablePath;
uint16 ExecutionState;
string Handle;
uint32 HandleCount;
datetime InstallDate;
uint64 KernelModeTime;
uint32 MaximumWorkingSetSize;
uint32 MinimumWorkingSetSize;
string Name;
string OSCreationClassName;
string OSName;
uint64 OtherOperationCount;
uint64 OtherTransferCount;
uint32 PageFaults;
uint32 PageFileUsage;
uint32 ParentProcessId;
uint32 PeakPageFileUsage;
uint64 PeakVirtualSize;
uint32 PeakWorkingSetSize;
uint32 Priority;
uint64 PrivatePageCount;
uint32 ProcessId;
uint32 QuotaNonPagedPoolUsage;
uint32 QuotaPagedPoolUsage;
uint32 QuotaPeakNonPagedPoolUsage;
uint32 QuotaPeakPagedPoolUsage;
uint64 ReadOperationCount;
uint64 ReadTransferCount;
uint32 SessionId;
string Status;
datetime TerminationDate;
uint32 ThreadCount;
uint64 UserModeTime;
uint64 VirtualSize;
string WindowsVersion;
uint64 WorkingSetSize;
uint64 WriteOperationCount;
uint64 WriteTransferCount;
};

Avec, bien sûr, les petites subtilités à Bill, citées plus haut :wink:
23/03/2006, 13h30
Davidvb6

Ok ba merci quand même tu temps que vous m'avez accordé mais je suis pas sûr d'avoir tout compris car le gestionnaire de tâches lui sait quand une application ne répond pas sans qu'on essaie de la fermer, il doit donc exister un moyen de récupérer cette info.
De plus en VB.net cela marche très bien.
23/03/2006, 13h34
jmfmarques

Citation:

tu temps

?
ou

Code:

tue temps?

:lol:
23/03/2006, 13h51
Davidvb6

pardon pour la faute de frappe mais ça arrive.
je suis pas sûr d'avoir tout compris car le gestionnaire de tâches lui sait quand une application ne répond pas sans qu'on essaie de la fermer, il doit donc exister un moyen de récupérer cette info.
De plus en VB.net cela marche très bien.
23/03/2006, 19h05
ThierryAIM

Citation:

Envoyé par Davidvb6

De plus en VB.net cela marche très bien.

Le problème, c'est que VB6, c'est pas VB.net
et que le gestionnaire des taches n'est pas non plus programmé en VB6
et que pour le moment, ben j'ai pas trouvé :?
24/03/2006, 08h20
Davidvb6

Si qq'un trouve une solution, je suis toujours preneur.
24/03/2006, 08h33
jmfmarques

Bonjour,

Citation:

Si qq'un trouve une solution, je suis toujours preneur.

dur, dur...
après d'autre recherches, M. Bill a également prévu (mais uniquement au lancement de quelques applications qui sont les siennes) d'alerter son client lors du démarrage (en cas d'insuccès) des dites applications... (il semble qu'il se soit contenté dans ces cas là d'un simple test de "connexion")
Dans d'autres cas, enfin, il semble que les applications "dénoncées" utilisent un timer de vérification
Je ne trouve absolument rien en ce qui concerne les blocages "en cours" des applications qui ne contiennent pas en elles-même ce genre de "délateur". :cry: