IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

send Mail VB net


Sujet :

VB.NET

  1. #1
    Membre averti
    Inscrit en
    Juin 2008
    Messages
    32
    Détails du profil
    Informations forums :
    Inscription : Juin 2008
    Messages : 32
    Par défaut send Mail VB net
    Bonjour

    j'ai un problem d'envoi mail par vb net sachant que j'ai modifier les parametres de securite de mon compte et j'ai activé POP
    erreur : échec lors de l'authentification.

    voici le
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    Imports System.Net.Mail
    Public Class Form1
       Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
          ' Set the caption bar text of the form.   
          Me.Text = "tutorialspoint.com"
       End Sub
     
       Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
          Try
             Dim Smtp_Server As New SmtpClient
             Dim e_mail As New MailMessage()
             Smtp_Server.UseDefaultCredentials = False
             Smtp_Server.Credentials = New Net.NetworkCredential("username@gmail.com", "password")
             Smtp_Server.Port = 587
             Smtp_Server.EnableSsl = True
             Smtp_Server.Host = "smtp.gmail.com"
     
             e_mail = New MailMessage()
             e_mail.From = New MailAddress(txtFrom.Text)
             e_mail.To.Add(txtTo.Text)
             e_mail.Subject = "Email Sending"
             e_mail.IsBodyHtml = False
             e_mail.Body = txtMessage.Text
             Smtp_Server.Send(e_mail)
             MsgBox("Mail Sent")
     
          Catch error_t As Exception
             MsgBox(error_t.ToString)
          End Try
       End Sub

  2. #2
    Membre émérite
    Homme Profil pro
    Responsable de service informatique
    Inscrit en
    Octobre 2006
    Messages
    727
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Jura (Franche Comté)

    Informations professionnelles :
    Activité : Responsable de service informatique
    Secteur : Distribution

    Informations forums :
    Inscription : Octobre 2006
    Messages : 727
    Par défaut
    Bonjour,

    Je ne vois pas d'erreur flagrante, mais est-tu sûr de tes identifiants (je comprends que tu n’aie pas mis les vrais dans le code exemple) ? (vérifie qu'il n'y a pas de blanc qui traine)
    Toutefois, essaye le port 465 plutôt que 587, puisque tu passes par l'option de sécurité SSL.

    Edit : Ah et POP n'a rien à voir avec l'envoi, c'est un protocole de réception, très ancien, on lui préfère souvent IMAP, même si lui non plus n'est pas jeune, et doit être prochainement remplacé.

    Edit 2 : Au fait, ton identifiant d'envoi est bien chez @gmail.com (ou.fr) ?

  3. #3
    Membre Expert Avatar de Phil Rob
    Homme Profil pro
    Retraité
    Inscrit en
    Novembre 2013
    Messages
    1 613
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Novembre 2013
    Messages : 1 613
    Par défaut
    Bonjour,

    Attention que pour envoyer des mails par cette approche, il faut que le compte GMail autorise les applications moins sécurisées.
    Cela ce règle dans la gestion du compte, comme illustré ci-dessous.
    Attention encore que, si ce compte n'est pas utilisé pendant un "certain temps", GMail ré-interdit les applications moins sécurisées. Il faut alors retourner dans la gestion du compte pour les autoriser à nouveau.

    C'est peut-être la source de ton problème ...

    Nom : SecurGMail.jpg
Affichages : 452
Taille : 82,7 Ko

  4. #4
    Membre averti
    Inscrit en
    Juin 2008
    Messages
    32
    Détails du profil
    Informations forums :
    Inscription : Juin 2008
    Messages : 32
    Par défaut
    Citation Envoyé par m4k-Hurrican Voir le message
    Bonjour,

    Je ne vois pas d'erreur flagrante, mais est-tu sûr de tes identifiants (je comprends que tu n’aie pas mis les vrais dans le code exemple) ? (vérifie qu'il n'y a pas de blanc qui traine)
    Toutefois, essaye le port 465 plutôt que 587, puisque tu passes par l'option de sécurité SSL.

    Edit : Ah et POP n'a rien à voir avec l'envoi, c'est un protocole de réception, très ancien, on lui préfère souvent IMAP, même si lui non plus n'est pas jeune, et doit être prochainement remplacé.

    Edit 2 : Au fait, ton identifiant d'envoi est bien chez @gmail.com (ou.fr) ?
    je suis sure de mes identifiants j'ai essaie tous les ports , mais en vain

    Nom : erreur.png
Affichages : 491
Taille : 45,2 Ko

  5. #5
    Membre émérite
    Homme Profil pro
    Responsable de service informatique
    Inscrit en
    Octobre 2006
    Messages
    727
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Jura (Franche Comté)

    Informations professionnelles :
    Activité : Responsable de service informatique
    Secteur : Distribution

    Informations forums :
    Inscription : Octobre 2006
    Messages : 727
    Par défaut
    As tu regardé la réponse de Phil Rob ?
    Et tu n'as pas confirmé que tu utilisais un identifiant gmail pour l'envoi. Sinon, Google considère que tu fais du relay et dans ce cas il faut utiliser un autre serveur smtp et il faut changer des paramètres dans le compte.

  6. #6
    Membre averti
    Inscrit en
    Juin 2008
    Messages
    32
    Détails du profil
    Informations forums :
    Inscription : Juin 2008
    Messages : 32
    Par défaut Resolu
    Bonjour

    merci pour vos reponses, j'ai pas reussi avec la classe system.net.Mail.
    mais j'ai trouvé une autre solution ça marche tres bien (ajouter référence EASendMail.dll )
    voici le code complet :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
     
    Imports EASendMail
    Public Class Form1
        Private Function _createMail() As SmtpMail
            Dim mail As SmtpMail = New SmtpMail("TryIt")
            mail.From = "adfrom@gmail.com"
            mail.[To] = "adto@gmail.com"
            mail.Cc = ""
            mail.Subject = "TestObj"
            mail.TextBody = "Bonjour bien reussi"
            mail.AddAttachment("C:\Users\Documents\Visual Studio 2012\Bon.rpt")
            Return mail
        End Function
        Private Function _createSmtpServer() As SmtpServer
            Dim server As SmtpServer = New SmtpServer("smtp.gmail.com")
            server.ConnectType = SmtpConnectType.ConnectSSLAuto
            server.Port = 587
            server.User = "identifiant@gmail.com"
            server.Password = "********"
            Return server
        End Function
        Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
            Try
                Dim smtp As SmtpClient = New SmtpClient()
                Dim server As SmtpServer = _createSmtpServer()
                Dim mail As SmtpMail = _createMail()
                smtp.SendMail(server, mail)
                MsgBox("mail envoyé")
            Catch exp As Exception
                MessageBox.Show(exp.Message)
            End Try
        End Sub
    End Class

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. send mail avec vbs
    Par jpclutier dans le forum VBScript
    Réponses: 6
    Dernier message: 26/01/2007, 12h37
  2. [VB.net 2.0] Send Mail
    Par zitoun dans le forum VB.NET
    Réponses: 2
    Dernier message: 18/12/2006, 20h25
  3. send Mail via JSP et Servlet
    Par sovop dans le forum Servlets/JSP
    Réponses: 3
    Dernier message: 08/10/2006, 16h22
  4. [Mail] Send Mail + lien
    Par cinc dans le forum Langage
    Réponses: 11
    Dernier message: 05/10/2006, 16h15
  5. Send mail / SMTP
    Par malmzi2007 dans le forum Zope
    Réponses: 8
    Dernier message: 28/07/2006, 07h57

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo