On click, cursor moves to what i want.

Right, i don't want it to move to on epoint i know how to do that.

What i want is, when they click the command button, it controls their mouse. making it do multiple things.

like making it do an autoer for runescape, would i need to record my movements and paste it on vb or something??
i really want it to do an auto fletcher. but i would have to get the movements somehow? maybe theres a recorder which gets the movements which i can copy/paste on vb?
please help asap.

Thanks.

 

well, since you know how to make it go to one point, look @ using those lines again.

look @ a wait function for helping with those pauses between movements and clicks.

There are a few sources out there that will show you how to make "auto"-ers, I think you should take a look at them.

I have a few sources on my site: Jazz.CNET that you might want to take a look at, since a few of them will help you out with your learning

 

There was no tuts on there. and i want sum1 to teach me. i need help. quick
please help. post ur ms here plzz.

Cruel if you read plz add me or any other good vb programmers -- [email protected]
thanks

 

wow....
i don't mean to be mean, but i doubt anyone will add you seeing you seem like the type of person that will be msging you constantly.

 

I'll make you an auto fletcher and send you the project, if you like...

 

this is a duplicate of his other thread, the question has already been answered....

 

it hasnt....u gave me a source but i cant open it

 

Here is kinda what your looking for I think...

Code:

Private Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
Private Type POINTAPI
    X As Long
    Y As Long
End Type
Private Sub Command1_Click()
Dim Pos1 As Integer, Pos2 As Integer
Pos1 = Text1.Text
Pos2 = Text2.Text
SetCursorPos Pos1, Pos2
End Sub

 

hmm ya that makes the mouse move to one position? but i want it so i can put multiple positions so it moves to one..then waits a selected time..then moves to another position...please help

 

Use a wait function...

Put this in a module:

Code:

Declare Function Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) As Long

Public Declare Function timeGetTime Lib "winmm.dll" () As Long

Public Function Wait(TimeOut As Long)
Dim TimeNow As Long
   TimeNow = timeGetTime()
   Do
      DoEvents 
   Loop While TimeNow + TimeOut > timeGetTime()
End Function

To use...

Code:

Wait (How long you want to wait in miliseconds)

I don't know who made that function, but credits to them.