Discussion :

[Jon Shannow]

Bonjour à toutes et tous,

Voilà, je me pose une question, qui de prime abord semble simple, mais pour laquelle la solution m'échappe.

Si je lance une application (depuis une appli Windev) avec LanceAppli, je peux récupérer le n° de processus (PID) en utilisant le paramètre exePid, dans la seconde syntaxe de la fonction.

La question que je me pose, c'est comment je sais que cette application a été fermée ? Bref, comment savoir que ce PID n'est plus valable ?

Si quelqu'un a une idée, merci d'avance.

JS

[djejackk]

Bonjour,

Tout simplement, avec la fonction ExeLancé (https://doc.pcsoft.fr/fr-FR/?3035003&name=ExeLance) : on peut passer le chemin de l'exécutable ou le PID.

Une autre méthode (moins fine) peut être de lister tous les processus avec ExeListeProcessus et de vérifier si une ligne correspond au PID.

[Jon Shannow]

Tout d'abord merci pour vos pistes.

Maintenant, j'ai un souci. Je vais devoir utiliser LanceAppliAssociée pour ouvrir des documents (excel, word, ...), mais je veux savoir quand est-ce que l'application est fermée. Je ne veux pas que l'application attende la fermeture de l'application, car l'utilisateur doit pouvoir retourner dans l'appli windev pour consulter ce qu'il veut afin de compléter le document ouvert. Par contre, j'ai besoin de savoir si l'application fille a été fermée.

Comme LanceAppliAssociée ne renvoie pas de PID, je me suis tourné vers ExeListeProcessus. Je récupère bien la liste des processus, mais je ne sais pas quels fichiers sont ouverts.

Par exemple, si j'ouvre un classeur Excel je vais retrouver une ligne me donnant le chemin complet de Excel (avec le nom du fichier passé en ligne de commande, si c'est comme ça que je l'ai ouvert ou si je l'ai lancé depuis l'explorateur). Mais, si j'en ouvre un second, le résultat ne change pas (mise à part la mémoire occupée).
Donc, je n'ai aucun moyen de savoir quels sont les fichiers ouverts et donc aucun moyen de savoir si on a fermé tel ou tel document.

Dans le gestionnaire des tâches de Windows, on retrouve bien une seule ligne pour Excel (par exemple), mais il est possible de dérouler la liste des documents ouverts. Comment est-ce que je peux obtenir la même chose avec Windev ? Je suppose qu'il faut passer par les API, mais lesquelles et comment ? Je ne suis pas un expert API.

Quelqu'un aurait déjà réalisé un truc comme ça et pourrait me donner une piste, ou alors une idée de solutions de contournement ?

L'idée est d'ouvrir un ou plusieurs documents (excel, word, ...) et de savoir quand ces documents sont refermés.

JS

[Voroltinquo]

Boujour,
Essaye avec fouvre avec un blocage en écriture. Si l'ouverture échoue (handle = -1 et errcodesysteme=32) c'est que le fichier est déjà ouvert. Il suffit de traiter ça dans ton CAS ERREUR

[Jon Shannow]

Boujour,
Essaye avec fouvre avec un blocage en écriture. Si l'ouverture échoue (handle = -1) c'est que le fichier est déjà ouvert.

Bonjour Voroltinquo,

Merci pour cette solution de contournement, comme on les aime dans Windev

[Voroltinquo]

J'ai édité légèrement la solution de contournement (temps de réflexion après le valider) mais le principe est le même

[jurassic pork]

hello,

passer par les API, mais lesquelles et comment ? Je ne suis pas un expert AP

Quelqu'un aurait déjà réalisé un truc comme ça et pourrait me donner une piste, ou alors une idée de solutions de contournement ?

L'idée est d'ouvrir un ou plusieurs documents (excel, word, ...) et de savoir quand ces documents sont refermés.

JS

peut-être en te servant de ma classe ClWinInfos :

Cette classe permet de récolter des informations sur les fenêtres Windows en activité (un peu comme Spy++). En particulier les Handles, Pid, noms de Classe et Titres des fenêtres Windows.

Voici un exemple d'utilisation pour trouver les fenêtres Excel et Word qui sont ouvertes :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
MonwinInfo est un ClWinInfos.WinInfo
MaClasseWinInfo est une ClWinInfos
 
// on recherche la fenêtre ayant un nom de classe contenant XLMAIN (MS EXcel)
Trace("============================ EXCEL ===========================================")
MonwinInfo = MaClasseWinInfo.GetWinInfo(0,"XLMAIN",Null,Null)
Trace("Handle : " + MonwinInfo.Hwnd,  "   Pid : " + MonwinInfo.Pid, 
"   Classe : " + MonwinInfo.Clas,"   Titre : " + MonwinInfo.Titre)
TableauSupprimeTout(MaClasseWinInfo.tabWinInfos)
Trace("============================ WORD =======================================")
// on recherche la fenêtre ayant un nom de classe contenant OpusApp ( MS Word) 
MonwinInfo = MaClasseWinInfo.GetWinInfo(0,"OpusApp",Null,Null)
Trace("Handle : " + MonwinInfo.Hwnd,  "   Pid : " + MonwinInfo.Pid, 
"   Classe : " + MonwinInfo.Clas,"   Titre : " + MonwinInfo.Titre)
TableauSupprimeTout(MaClasseWinInfo.tabWinInfos)

et voici le résultat . Dans un premier temps il y avait un Word et en Excel actif. Dans un deuxième temps les applications avaient été fermées :


Ami calmant, J.P

[Jon Shannow]

Salut JP,

Juste une question, est-ce que cette classe sera capable de me lister tous les documents ouverts dans excel ou word, par exemple ?

JS

[jurassic pork]

Non, il s'arrête à la première fenêtre trouvée avec les conditions

[Jon Shannow]

Non, il s'arrête à la première fenêtre trouvée avec les conditions

Mais c'est modifiable

[jurassic pork]

hello,
voici une solution olé olé avec des objets automation :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
// Test Docs Excel Word   J.P 09/2021
XLObj est un objet Automation dynamique
WordObj est un objet OLE dynamique
i est un  entier
SI ObjetActif("Excel.Application") <> Null ALORS
	// Récupération de l'instance de Excel existante
	XLObj = ObjetActif("Excel.Application")
	Trace(" ======== Documents Excel ouverts ==========")
	POUR i=1 _A_ XLObj>>Workbooks>>Count
		Trace(XLObj>>Workbooks>>Item(i)>>Name)
	FIN
SINON
	Trace("Excel n'est pas ouvert")
FIN
SI ObjetActif("Word.Application") <> Null ALORS
	// Récupération de l'instance de Word existante
	WordObj = ObjetActif("Word.Application")
	Trace(" ======== Documents Word ouverts ==========")
	POUR i=1 _A_ WordObj>>Documents>>Count
		Trace(WordObj>>Documents>>Item(i)>>Name)
	FIN
SINON
	Trace("Word n'est pas ouvert")
FIN

Exemple de résultat :



Ami calmant, J.P

[frenchsting]

Bonjour,

Je sais que j'ai qqpart un bout de code avec un appel api qui va lister tous les processus en cours... Mais il faut que je le retrouve...

[Jon Shannow]

Merci à tous pour vos propositions, mais je pense que j'ai trouvé ma solution. Je vais utiliser la classe de JP et tester si le document est toujours dans la liste. S'il ne l'est plus, c'est qu'on a fermé. Ensuite, il me reste à comparer la date et l'heure de modif du document avec celle lors de l'ouverture pour savoir si le document a été modifié.

Je risque de me heurter à d'autres soucis, alors je vais laisser le post ouvert...

Encore merci à tous.

JS

[jurassic pork]

hello,
c'est quoi le souci avec la méthode OLE ? il y a des documents qui s'ouvre avec des applications qui n'ont pas d'objet COM ?
Ami calmant, J.P

[Jon Shannow]

C'est ça. Je ne suis pas sûr que je puisse gérer tous les documents de cette manière. Et puis ta classe est très rapide, et avec TableauChercheParProcédure, c'est très facile de savoir si le document est toujours ouvert. Et la méthode est la même quelle que soit l'outil (Excel ou Word).
Merci pour ta classe en tout cas