Discussion :

[remyyyyy]

bonjour , j'ai fait un petit logiciel d'envoie de mail avec visual basic 2010 .
Seulement a la fin de mon code , j 'ai écris smtp.send(mail) .quand j'envois le mail ,le logiciel se stop et visual basic m'affiche cette erreur :
l’exception smtpexeption n'a pas été géré

j'ai cherché sur plusieurs site ,notamment msdn ; je ne trouve pas l'erreur
si quelqu'un pourrait m'aidait ce serait gentil .
voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
           Dim mail As New MailMessage
            Dim smtp As New SmtpClient("smtp.gmail.com")
 
            mail.From = New MailAddress("mon adresse <a href="mailto:mail@gmail.com">mail@gmail.com</a>")
            mail.To.Add("adresse du destinataire")
            mail.Subject = "sujet"
            mail.Body = "message"
 
            smtp.Port = "587"
            smtp.Credentials = New System.Net.NetworkCredential("mon adresse <a href="mailto:mail@gmail.com">mail@gmail.com</a>", "mon mot de passe")
            smtp.EnableSsl = True
            smtp.Send(mail)

merci d'avance a celui ou celle qui pourrait m'aidait : )

[Sankasssss]

Bonsoir,

une rapide recherche : SMTP GMAIL VB.NET

Nous donnes ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
   Dim Mail As New MailMessage
    Dim SMTP As New SmtpClient("smtp.gmail.com")
 
    Mail.Subject = "Security Update"
    Mail.From = New MailAddress("name@gmail.com")
    SMTP.Credentials = New System.Net.NetworkCredential("name@gmail.com", "password") '<-- Password Here
 
    Mail.To.Add(address & "@gmail.com") 'I used ByVal here for address
 
    Mail.Body = "" 'Message Here
 
    SMTP.EnableSsl = True
    SMTP.Port = "587"
    SMTP.Send(Mail)

A tester. Dans votre code on voit déjà au premier coup d’œil un soucis au niveau de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

mail.From = New MailAddress("mon adresse <a href="mailto:mail@gmail.com">mail@gmail.com</a>")

rien qu'au niveau des ouvertures et fermetures d'apostrophes, c'est d'ailleurs étonnant que cela compile...

[wallace1]

rien qu'au niveau des ouvertures et fermetures d'apostrophes, c'est d'ailleurs étonnant que cela compile...

Salut sankass,

Clair que ca ne compile pas.
A mon avis il a fait un copié/collé en 2 temps 3 mouvements pour ne pas laisser son adresse mail originale qui est dans son vrai code source.

[remyyyyy]

merci pour l'aide , et je debute seulement dans la programmation mais pourtant ca a compilé...

[remyyyyy]

le code marche oui mais il y a cependant un second probleme , je ne sais si c'est en rapport avec ma connexion mais il y a une errur au meme endroit au meme moment
cette foois ci il marque : Le serveur SMTP requiert une connexion sécurisée ou le client n'était pas authentifié. La réponse du serveur était : 5.5.1 Authentication Required. Learn more at

[Sankasssss]

Peux-tu nous montrer ce que tu as fais?
En remplaçant ton adresse email par "monadressemail@gmail.com" et ton password par "monpassword" afin de nous assurer ce que tu as changé et non recopié...

[Sankasssss]

P.S. : essaye avec le port 465

[remyyyyy]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim Mail As New MailMessage
            Dim SMTP As New SmtpClient("smtp.gmail.com")
 
            Mail.Subject = "lol"
            Mail.From = New MailAddress("monadressemail@gmail.com")
            SMTP.Credentials = New System.Net.NetworkCredential("monadressemail@gmail.com", "monpassword") '<-- Password Here
 
            Mail.To.Add("monadressemail@gmail.com") 'I used ByVal here for address
 
            Mail.Body = "   " 'Message Here
 
            SMTP.EnableSsl = True
            SMTP.Port = "587"
            SMTP.Send(Mail)

je viens d'essayer comme tu me l'as dit , avec un port différent , il n'y a plus l'erreur en revenche il me marque "délai d'attente a expiré"
je pense que ca vient tous simplement d'un problème de connexion