Bonjour,

Je recherche un moyen de savoir si un exe n'est pas en cours d’exécution.

J'ai trouver sa sur dans les tutoriels Visual Basic 6 :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Function IsFileOpen(ByVal strFic As String) As Boolean
    Dim fic As Integer
    On Error Resume Next
 
    fic = FreeFile()
    Open strFic For Input Access Read Lock Read Write As fic
 
    If err.Number = 0 Then
        IsFileOpen = False
        Close fic
    Else
        IsFileOpen = True
    End If
End Function
Cela fonctionne parfaitement sous Win7 mais pas sous Win XP.

Y a t'il une autre solution, merci