Simulate mouse click

This is what I found:

Code:
'Before you start this program, I suggest you save everything that wasn't saved yet.
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: [url]http://www.allapi.net/[/url]
    'E-Mail: [email]KPDTeam@Allapi.net[/email]
    Do
        'Simulate a mouseclick on the cursor's position
        mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0&, 0&, cButt, dwEI
        DoEvents
    Loop
End Sub
 
Can you change to code (types of variables) to .NET correct language?

The DECLARE statement, can you set it on another way... I remember I saw it otherwise.
 
I dont think there there is a correct .NET way because mouse_event hasnt been not made a framework part yet.
But from what I know, VB6's long is the same lenght as VB.NET Interger so change the Longs in declarations to Integers.
 
You can use the DllImport() attribute.. somethin like this;

Visual Basic:
<DllImport("user32")> _
Sub mouse_event (ByVal dwFlags As Integer, _
   ByVal dx As Integer, _
   ByVal dy As Integer, _
   ByVal cButtons As Integer, _
   ByVal dwExtraInfo As Integer)

   '
End Sub

Hope that works.

mutant:
It's a windows API function, which means you can use it in any language as it's part of windows itself.
 
lol... you think I didnt know?
Of course I know, but you know how the API functions are ported to .NET class libraries? I was talking about that
 
mutant said:
lol... you think I didnt know?
Of course I know, but you know how the API functions are ported to .NET class libraries? I was talking about that

*shrug* Sorry. It didn't sound like you knew from the replies you were giving...

I dont think there there is a correct .NET way because mouse_event hasnt been not made a framework part yet.
But from what I know, VB6's long is the same lenght as VB.NET Interger so change the Longs in declarations to Integers.


Just trying to help. :p
 
Back
Top