Vb.net Tutorial [Repeat E-mail Sender]
Posted: Fri Dec 11, 2009 7:42 pm
Hello, this is a vb.net tutorial how to make a easy e-mail bomber.
Not to be used for malicious purposes.
first make
-form1
-2 buttons (button1 and button2)
-timer1
-4x textbox (textbox1, textbox2, textbox3, textbox4)
-4x labels (label1, label2, label3, label4) (txt on it) (To:, Subject:, Message(multilined), Interval:)
then make another form:
-Loginform1
-make it bigger and add some stuff in it:
-add 2 textboxex (textbox1, textbox2)
-add 1 button (txt on it = save)
-add 2 labels (txt on it = SMTP: and Port:)
IM NOT CHANGING ANY NAME!!!! just the default names
OK, then now go to 'My Project' -> 'Application' (startup form = loginform1) and (Shutdown mode: When last form closes)
then go to settings make 4 settings called 'save1, save2, save3, save4'
First we are going to do loginform!!!!!
in the button1(with text save) type this:
now we did loginform lets go to form1:
put this code in form1.timer1:
btw some extra information:
-smtp.gmail.com is for gmail
-smtp.live.com is for live/hotmail
-default port = 587
This is my bomberaar + messenger tools atm
Not to be used for malicious purposes.
first make
-form1
-2 buttons (button1 and button2)
-timer1
-4x textbox (textbox1, textbox2, textbox3, textbox4)
-4x labels (label1, label2, label3, label4) (txt on it) (To:, Subject:, Message(multilined), Interval:)
then make another form:
-Loginform1
-make it bigger and add some stuff in it:
-add 2 textboxex (textbox1, textbox2)
-add 1 button (txt on it = save)
-add 2 labels (txt on it = SMTP: and Port:)
IM NOT CHANGING ANY NAME!!!! just the default names
OK, then now go to 'My Project' -> 'Application' (startup form = loginform1) and (Shutdown mode: When last form closes)
then go to settings make 4 settings called 'save1, save2, save3, save4'
First we are going to do loginform!!!!!
in the button1(with text save) type this:
Code: Select all
ok then in the OK button type this My.Settings.save1 = TextBox1.Text
My.Settings.Save()
My.Settings.save2 = TextBox2.Text
My.Settings.Save()
My.Settings.save3 = UsernameTextBox.Text
My.Settings.Save()
My.Settings.save4 = PasswordTextBox.Text
My.Settings.Save()
Code: Select all
and in the loginform load: Form1.Show()
Me.Hide()
Code: Select all
TextBox1.Text = My.Settings.save1
TextBox2.Text = My.Settings.save2
UsernameTextBox.Text = My.Settings.save3
PasswordTextBox.Text = My.Settings.save4]
now we did loginform lets go to form1:
put this code in form1.timer1:
Code: Select all
and this in button1:
Dim mail As New MailMessage
mail.To.Add(TextBox1.Text)
mail.From = New MailAddress(LoginForm1.UsernameTextBox.Text)
mail.Subject = TextBox2.Text
mail.Body = TextBox3.Text
Dim smtp As New SmtpClient(LoginForm1.TextBox1.Text)
smtp.Port = (LoginForm1.TextBox2.Text)
smtp.EnableSsl = True
smtp.Credentials = New System.Net.NetworkCredential(LoginForm1.UsernameTextBox.Text, LoginForm1.PasswordTextBox.Text)
smtp.Send(mail)
Code: Select all
button2:
timer1.enabled = true
timer1.interval = textbox4.text
Code: Select all
add this to the form1 code:
timer1.enabled = false
Code: Select all
then work somthing about the layout and spam devil; Private Sub Form1_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
LoginForm1.Close()
End Sub
btw some extra information:
-smtp.gmail.com is for gmail
-smtp.live.com is for live/hotmail
-default port = 587
This is my bomberaar + messenger tools atm