Visual Basic 6 - Simulare il click del mouse

Forum - Visual Basic 6 - Simulare il click del mouse

alpha348 (Normal User)
Newbie

Messaggi: 1
Iscritto: 22/05/2008

Postato alle 12:52
Martedì, 25/08/2009

Ciao a tutti, avrei bisogno di una dritta, devo far spostare il muose in una data posizione dello schermo, devo leggere il link che vi è sotto ed effettuare il click.
per la prima parte credo il mouvemouse possa aiutarmi, ma mi trovo in difficoltà per il resto.
come posso fare?
grazie

GrG (Member)
Guru^2

Messaggi: 3430
Iscritto: 21/08/2007

Postato alle 13:43
Martedì, 25/08/2009

in un modulo:

Codice sorgente - presumibilmente VB.NET

Public Const MOUSEEVENTF_LEFTDOWN = &H2
Public Const MOUSEEVENTF_LEFTUP = &H4
 
Public Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dX As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

poi basta richiamare queste due sub:

Codice sorgente - presumibilmente VB.NET

Private Sub LeftDown() 'quando il tasto del mouse viene premuto
mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
End Sub
Public Sub LeftUp() 'quando il tasto del mouse viene rilasciato
mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
End Sub