Oppure

Loading
25/08/09 10:52
alpha348
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
aaa
25/08/09 11:43
GrG
in un modulo:
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:
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
aaa