Styring af mus?

Ja, du kan bruge dette API-kaldet SetCursorPosition.
Dette indsættes øverst i en form eller et modul:

Declare Function SetCursorPos Lib "user32" Alias "SetCursorPos" (ByVal x As Long, ByVal y As Long) As Long

Nu kan du hvorsomhelst i din kode flytte musen:

Dim a As long
a = SetCursorPos(x,y)    hvor x og y angives i pixels -0,0 er øverst til venstre

/tjacob

MHT at klikke: Du kalder bare Click-eventet for den kontrol der ligger på de aktuelle koordinater. Hvis det f.eks. er på Form1:

Call Form1_Click

Det er det der er problemet :( det er ikke på formen den skal klikke det er i et andet vindue... kan det lade sig gøre ??

Klippet All-API-nets guide:

Private 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)
Const MOUSEEVENTF_LEFTDOWN = &H2
Const MOUSEEVENTF_LEFTUP = &H4
Const MOUSEEVENTF_MIDDLEDOWN = &H20
Const MOUSEEVENTF_MIDDLEUP = &H40
Const MOUSEEVENTF_MOVE = &H1
Const MOUSEEVENTF_ABSOLUTE = &H8000
Const MOUSEEVENTF_RIGHTDOWN = &H8
Const MOUSEEVENTF_RIGHTUP = &H10

Private Sub Form_Activate()
    'KPD-Team 1998
    'URL: http://www.allapi.net/
    'E-Mail: KPDTeam@Allapi.net
    Do
        'Simulate a mouseclick on the cursor's position
        mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0&, 0&, cButt, dwEI
        DoEvents
    Loop
End Sub

/tjacob

Tjek den webside for mere detaljeret forklaring ;-)

Her: http://www.allapi.net/apilist/apifunction.php?apifunction=mouse_event

Mange tak det var lige præsis det jeg ledte efter :-)