Visual Basic 2010 Problem

[Akware]

Witam mam taki problem chce zrobic program w ktorym wpisze dane to wysle mi je na email
Tylko przy debugowaniu wywala mi blad dokladnie ten ktory zaznaczylem na czerwono

 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("G*****)", "la*****")


        smtpServer.Port = 587


        smtpServer.Host = "smtp.gmail.com"


        smtpServer.EnableSsl = True


        mail = New MailMessage()


        mail.From = New MailAddress("******@gmail.com")


        mail.To.Add("G******@gmail.com")


        mail.Subject = ("temat")


        mail.Body = "Login: " + Login.Text & Chr(12) + "Hasło: " + Haslo.Text


    [COLOR=#ff0000]    smtpServer.Send(mail)[/COLOR]

 

[Vandervir]

Jaki to błąd wyskakuje?

 

[Akware]

smtpServer.Send(mail)
To w Visual Basic jest podkreslone na zolto

 

[ZuO]

Imports System.Net.Mail
Imports System.Web



Dim mail As New MailMessage()
Dim SmtpServer As New SmtpClient
SmtpServer.Credentials = New Net.NetworkCredential("[email protected]", "hasło do maila")
SmtpServer.Port = 587
SmtpServer.Host = "smtp.gmail.com"
SmtpServer.EnableSsl = True
SmtpServer.EnableSsl = True
mail.To.Add("do kogo ma być wysyłany [email protected]")
mail.From = New MailAddress("od kogo ma być wysyłany czyli w tym przypadku było by to [email protected]")
mail.Subject = ( "tytuł wiadomości")
mail.Body = TextBox2.Text teść wiadomości
SmtpServer.Send(mail)

 

[Itterek]

E-Mail wymaga uwierzytelnia SMTP, musisz sobie znaleźć inny, który tego nie potrzebuję, chyba ;>