Applicatons ouvertes
cs_adesurmont
Messages postés
13
Date d'inscription
mardi 14 janvier 2003
Statut
Membre
Dernière intervention
1 février 2011
-
18 août 2006 à 22:36
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 - 18 août 2006 à 22:50
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 - 18 août 2006 à 22:50
A voir également:
- Applicatons ouvertes
- Suivie des winform ouvertes par les utilisateurs - Forum C# / .NET
- Liste des fenêtres MDI child ouvertes - Forum Visual Basic
- Pop-Up au dessus de toutes les applications ouvertes - Forum Delphi / Pascal
- Controle du nombre de fenetres ouvertes dans la meme session - Forum ASP.NET
1 réponse
mortalino
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
18
18 août 2006 à 22:50
18 août 2006 à 22:50
Salut,
il faut voir du côté de l'API FindExecutable :
Dans les déclarations :
Private Declare Function FindExecutableA Lib "shell32.dll" _
(ByVal lpFile As String, ByVal lpDirectory As String, _
ByVal lpResult As String) As Long
Puis, voici une fonction :
Function TrouverExecutable(NomFichier As String) As String
Dim CheminAs String
Dim Rep As Long
Chemin = Space(255)
Rep = FindExecutable(NomFichier, "", Chemin)
TrouverExecutable = Trim(Chemin)
End Function
@++
<hr size="2" width="100%" />
--Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--
il faut voir du côté de l'API FindExecutable :
Dans les déclarations :
Private Declare Function FindExecutableA Lib "shell32.dll" _
(ByVal lpFile As String, ByVal lpDirectory As String, _
ByVal lpResult As String) As Long
Puis, voici une fonction :
Function TrouverExecutable(NomFichier As String) As String
Dim CheminAs String
Dim Rep As Long
Chemin = Space(255)
Rep = FindExecutable(NomFichier, "", Chemin)
TrouverExecutable = Trim(Chemin)
End Function
@++
<hr size="2" width="100%" />
--Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--
