Discussion :

[batou22003]

Bonjour,

j'ai fait des essais avec un code que j'ai récupéré.
Ca me lance une exception sur appel de la procédure d'envoi
c.Send. Vous avez des idées , une autre méthode, autre facon de faire.

J'ai une adresse de serveur smtp, avec les accès et tout et tout.

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
 
    Public Sub SendMail(ByVal [To] As String, ByVal Subject As String, ByVal Body As String)
        Const User As String = "###@gmail.com"
        Const Password As String = "####"
 
 
        Dim m As New MailMessage
        m.From = New MailAddress(User)
        m.To.Add(New MailAddress([To]))
        m.Subject = Subject
        m.Body = Body
        Dim c As New SmtpClient("smtp.gmail.com", 587)
        'Dim c As New SmtpClient("smtp.live.com", 25)
        c.EnableSsl = True
        c.Credentials = New NetworkCredential(User, Password)
        c.Send(m)
        m.Dispose()
    End Sub
 
    Sub testEmail()
        SendMail("monadresse@yahoo.fr", "Salut", "Test")
    End Sub

[Pol63]

Ca me lance une exception

type de l'exception ? message ? (ca parait logique de le préciser ...)

[peregna2007]

Est ce un problème liée à la connexion au serveur SMTP ou un problème lié au code ?? Seul le message d'erreur peut nous le dira.

[batou22003]

Le compilateur bloque sur c.send(m) :

L'exception SmptException n'a pas été gérée

Echec d'envoi du courrier

[Pol63]

sur un smtpexception il y a aussi une propriété smtpstatus qui correspond à l'enum suivante :

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
 
Public Enum SmtpStatusCode
    BadCommandSequence = &H1F7
    CannotVerifyUserWillAttemptDelivery = &HFC
    ClientNotPermitted = &H1C6
    CommandNotImplemented = &H1F6
    CommandParameterNotImplemented = &H1F8
    CommandUnrecognized = 500
    ExceededStorageAllocation = &H228
    GeneralFailure = -1
    HelpMessage = &HD6
    InsufficientStorage = &H1C4
    LocalErrorInProcessing = &H1C3
    MailboxBusy = 450
    MailboxNameNotAllowed = &H229
    MailboxUnavailable = 550
    MustIssueStartTlsFirst = 530
    Ok = 250
    ServiceClosingTransmissionChannel = &HDD
    ServiceNotAvailable = &H1A5
    ServiceReady = 220
    StartMailInput = &H162
    SyntaxError = &H1F5
    SystemStatus = &HD3
    TransactionFailed = &H22A
    UserNotLocalTryAlternatePath = &H227
    UserNotLocalWillForward = &HFB
End Enum

et mets des try catch dans ton application aussi !

[batou22003]

ok, merci. Ca venait du "Nom du serveur". Merci Monsieur.

Et j'ai du modifier le code pour récupérer directement mon credential ,
mes info. de sécurité :

Code :

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

1
2
3
4
5
6
7
8
 
    c.Credentials = CredentialCache.DefaultNetworkCredentials
 
'et je rajoute la gestion d'erreur
   Catch ex As SmtpException
        ' MsgBox(ex.Message)
 
    End Try

[peregna2007]

j'ai testé ton code et il se trouve que tu n'es pas authentifié sur le serveur SMTP de google(smtp.gmail.com) Cidessous l'execption que j'ai récupèrée.

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...

[WOLO Laurent]

Je sais que votre poste est résolu mais je voulais simplement que vous puissiez savoir que quelque soit ce que vous faîtes, sauf à passer par un https, les protocoles SMPT et POP3 laissent passer les username et les mot de passe en texte claire ? Unitile donc de vous fatiguer à les crypter côté application puisse que de toutes les façons ils transiteront en clair sur le réseau !