Cara membuat Spammer sendiri

Do you Like this story..?


Get Free Email Updates Daily!	Follow us!

Alat2 di VB :
1) 1 ProggresBar
2) 3 TextBox
textbox1 dgn text = Spam Text
textbox2 dgn text = Interval(Masukkan Angka)
textbox3 dgn text = Masukkan Jumlah Spam Text
3) 3 Button
Button1 dgn text = Start
Button2 dgn text = Stop
Button3 dgn text = Start and Hide

4) 1 Timer

=================

1) Susunlah komponen tersebut seperti ini.........

2) Klik 2 kali Button1,dan masukkan code berikut

Code:

Timer1.Interval = TextBox2.Text

        Timer1.Enabled = True

3) Klik 2 kali Button2,dan masukkan code berikut

Code:

Timer1.Enabled = False

        TextBox1.Text = "Spam Text"

        TextBox2.Text = "Interval"

        TextBox3.Text = "Masukkan Jumlah Spam Text"

4) Klik 2 kali Button3,dan masukkan code berikut

Code:

 Timer1.Interval = TextBox2.Text

        Timer1.Enabled = True

        Me.Hide()

5) Klik 2 kali TextBox1,dan masukkan code berikut

Code:

If TextBox1.Text = "" Then

            TextBox2.Enabled = False

        Else

            TextBox2.Enabled = True

        End If

6) Klik 2 kali TextBox2,dan masukkan code berikut

Code:

If TextBox2.Text = "" Then

            TextBox3.Enabled = False

        Else

            TextBox3.Enabled = True

        End If

7) Klik 2 kali Timer1,dan masukkan code berikut

Code:

If TextBox3.Text = "0" Then

            Timer1.Enabled = False

            TextBox1.Text = "Spam Text"

            TextBox2.Text = "Interval (Masukkan Angka)"

            TextBox3.Text = ""

        Else

            SendKeys.Send(TextBox1.Text)

            SendKeys.Send("{Enter}")

            TextBox3.Text = TextBox3.Text - 1

            ProgressBar1.Increment(5)

            If ProgressBar1.Value = ProgressBar1.Maximum Then

                ProgressBar1.Value = 0

            End If

            If TextBox3.Text = "0" Then

                ProgressBar1.Value = 0

            End If

        End If