Bonjour,

Depuis quelques jours je suis confronté à un petit problème ...
Je cherche a automatiser des tâches grâce à une petite application que je suis entrain de développer.

Je m'explique, je dispose d'un programme qu'il faut que j'actualise toute les heures (professionnel).
L'actualisation consiste à cliquer sur trois bouton et rentrer du texte dans une textbox.

Le problème est que je ne sais pas du tout comment faire pour générer des clics à une position précise (X/Y)
De plus, en arrière plan sans que le curseur ne bouge afin de faire autre chose en même temps.

J'ai regardé sur internet et je sais déjà qu'il faut utiliser l'API user32.dll de Windows,
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
<DllImport("user32.dll", CharSet:=CharSet.Auto)>Private Shared Function SendMessage(ByVal hWnd As IntPtr, ByVal Msg As UInt32, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As IntPtr
    End Function
Merci

J'ai essayé ce bout de code mais sa ne fonctionne pas ..


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
<DllImport("user32.dll")> Shared Function SendMessage(ByVal hWnd As IntPtr, ByVal Msg As Integer, ByVal wParam As Integer, ByRef lParam As IntPtr) As IntPtr
        End Function
        <DllImport("user32.dll")> Shared Function WindowFromPoint(ByVal pnt As Point) As IntPtr
        End Function
 
        Const BM_CLICK As Integer = &HF5&
 
        Public Shared Sub click(ByVal posCursor As Point)
            Dim pnt As Point = posCursor
            Dim hWnd As IntPtr = WindowFromPoint(pnt)
 
            If hWnd <> IntPtr.Zero Then
                SendMessage(hWnd, BM_CLICK, 0, IntPtr.Zero)
 
            End If
        End Sub