Jump to content

VB2010 Auto Spammer Help

- - - - -

  • Please log in to reply
No replies to this topic

#1
CyleDyerHero1

CyleDyerHero1

    Newbie

  • Members
  • PipPip
  • 13 posts
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Enabled = True
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Timer1.Enabled = False
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
On Error Resume Next
SendKeys.Send(TextBox1.Text)
---------------------------------------
Wont work in this area^?
---------------------------------------
SendKeys.Send("{space}")
End Sub
End Class




1 user(s) are reading this topic

0 members, 1 guests, 0 anonymous users