Programming a spambot
Posted: Fri Jan 18, 2008 2:04 pm
Hiya dudes, does anybody know a way to make program to (for example) write text "lol" to place where you have your writing symbol u know, and it would also press enter itself?
The Next Generation of 2D Roleplaying Games
http://elysianshadows.com/phpBB3/
Code: Select all
Public Class Autotyper
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
Timer1.Interval = TextBox2.Text
SendKeys.Send(TextBox1.Text)
If CheckBox1.Checked = True Then
SendKeys.Send("{enter}")
End If
End Sub
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
End Sub
Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
End Sub
Private Sub Autotyper_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class
Code: Select all
HotKeySet("{Ins}", "SendKeys")
While 1
Sleep(10)
WEnd
Func SendKeys()
Send("LINE OF TEXT {Enter}")
EndFunc