[VB6] Listage des fenêtres windows
bonjour,
Je me suis basé sur les exemples du forum et de "AllApi.net" pour lister et fermer une application windows dont je ne connais que le nom.
Vb me sort une erreur dès l'éxecution sur EnumWindows :
Utlisation incorrecte de l'opérateur AddressOf (cela commence mal)
Voici mes qqes lignes:
Private Sub Form_Load()
EnumWindows AddressOf EnumWindowsProc, ByVal 0&
End Sub
Public Function EnumWindowsProc(ByVal hwnd As Long, ByVal lParam As Long) As Boolean
Dim sSave As String, Ret As Long
Ret = GetWindowTextLength(hwnd)
sSave = Space(Ret)
GetWindowText hwnd, sSave, Ret + 1
If sSave = "Outlook" Then
PostMessage hwnd, &H10, 0, 0
End If
Form1.Print Str$(hwnd) + " " + sSave
'continue enumeration
EnumWindowsProc = True
End Function