Make a simple chat spammer
Posted by
Darki
Tutorial learns you how to make a chat spammer . Open Vb6.0 and select STANDARD .EXE . Add 2 TextBoxes 2 Buttons & 1 Timer. Like me.
Lets write code. First of all make your text1 Multiline TRUE and set timer1 interval to 300 & Enabled = false.
Code:
Private Sub Command1_Click()
Timer1.Enabled = True 'start spam
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False 'if u like to stop spam in progress.
End Sub
Private Sub Timer1_Timer()
For i = 1 To Text2.Text
SendKeys Text1.Text 'send text in Text1
SendKeys "~" 'sendkey ENTER
Next
Timer1.Enabled = False 'when spam complete timer1 enabled = false
End Sub
Thats all. Test it . It works for me.
If u have any questions , suggestions , if u find a bug or anything else just comment! :P
If u have any questions , suggestions , if u find a bug or anything else just comment! :P
Note : When u click start you need to select the chat window fast ( or notepad whatever )
Subscribe to:
Post Comments (Atom)
Post a Comment