Thread: How to email?

Results 1 to 2 of 2
  1. #1
    Golden.'s Avatar
    Join Date
    Jun 2010
    Gender
    male
    Posts
    156
    Reputation
    10
    Thanks
    3
    My Mood
    Amazed

    How to email?

    So i want someone to fill in a form
    Eg..
    Name: Example
    Age: Example:
    Email : Example@example.com

    Then for it to be like

    Send (textbox1.text)
    Send (textbox2.text)
    Send (textbox3.text)
    To example@example.com

    So it will submit the inputted data to an email address?
    Thx

  2. #2
    itaku's Avatar
    Join Date
    May 2009
    Gender
    male
    Location
    Hell.
    Posts
    26
    Reputation
    10
    Thanks
    2
    My Mood
    Paranoid
    Search up a simple email bomber tut.. else use my code ripped from my email bomber.. but guess what? i crypted it;
    Code:
    Imports System.Net.Mail
    
    
    Public Class Form1
    
        Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
            End
        End Sub
    
        Private Sub Start_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Start.Click
            Timer1.Start()
        End Sub
    
        Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
            Timer1.Stop()
        End Sub
    
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    
        End Sub
    
        Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
            Dim ZlZnvyZrffntr As New MailMessage()
            ZlZnvyZrffntr.From = New MailAddress(TextBox1.Text)
            ZlZnvyZrffntr.To.Add(TextBox3.Text)
            ZlZnvyZrffntr.Subject = (TextBox4.Text)
            ZlZnvyZrffntr.Body = TextBox5.Text
            Dim FZGCFreire As New SmtpClient("smtp.gmail.com")
            FZGCFreire.Port = 587
            FZGCFreire.Credentials = New System.Net.NetworkCredential(TextBox1.Text, TextBox2.Text)
            FZGCFreire.EnableSsl = True
            Label1.Text = Val(Label1.Text + 1)
            FZGCFreire.Send(ZlZnvyZrffntr)
        End Sub
    End Class

Similar Threads

  1. Help -_- How can i find the email i used with my CA account
    By doingtimeforlife in forum Combat Arms Discussions
    Replies: 6
    Last Post: 09-28-2009, 01:50 PM
  2. How to change WarRock.net Email?
    By steven_italy in forum WarRock - International Hacks
    Replies: 2
    Last Post: 12-01-2008, 10:57 PM
  3. i wanna spam someones email how can i do that?
    By maiko in forum Spammers Corner
    Replies: 3
    Last Post: 03-20-2008, 11:25 AM
  4. how to make alot of email accounts
    By najo22 in forum WarRock - International Hacks
    Replies: 5
    Last Post: 09-30-2007, 11:48 AM