visual basic 2008 e-mail gönderme YARDIM

[kangal0640]

arkadaşlar vbasic 2008 de smtp ile e-mail göndermede hata alıyorum.kodlar ve hata resmi aşağıda.Nerede hata yapıyorum?

////kodlar////

Imports System.Net.Mail
Public Class Form1
    Dim mail As New MailMessage
    Dim smtp As New SmtpClient("smtp.gmail.com", "587")
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        mail.Subject = "deneme"
        mail.To.Add("ALICI@gmail.com")
        mail.From = New MailAddress("MAİL ADRESİ@gmail.com")
        mail.Body = "bu bir denemedir."
        smtp.EnableSsl = True
        smtp.UseDefaultCredentials = False
        smtp.Credentials = New System.Net.NetworkCredential("MAİL ADRESİ@gmail.com", "ŞİFRE")
        smtp.Port = "587"
        Try
            smtp.Send(mail)
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub
End Class

////////////////////////////////////////////////


kimlik doğrulama falan diyor ama nasıl çözeceğimi bulamadım.

[kangal0640]

Teşekkür ederim yardımınız için.Ama aynı hatayı tekrar ediyor.Galiba gmail ile alakalı bir problem

[kangal0640]

teşekkürler.izleyip deneyeyim bir.

[kangal0640]

Sorunu çözdüm. Kodlar doğru.Sorun;un sebebi GMAIL'in güvenlik ayarlarlarıyla ilgili.Gmail, visual basic in hesaba bağlanmasına izin vermiyor.(Gönderici hesabının)Bu sorunu düzeltmek için E-Posta hesabınızın güvenlik ayarlarında ("https://www.google.com/settings/security/lesssecureapps " adresinde) diğer uygulamaların hesaba erişimini kapat/aç seçeneğini "aç" işaretlemek gerekiyor.Hatta butona bir kod koyup eğer bu hatayı veriyorsa https://www.google.com/settings/security/lesssecureapps  adresine gidilmesi gerektiği msgbox ile bildirilebilir.