Discussion :

[cedric.gassan]

Bonjour,

Mon problème est simple mais le contexte dans lequel il est lui ne l'est pas, je vais donc essayer d'être le plus clair possible.

Le contexte :
Je développe un programme dans lequel on peut envoyer des mails. Ce programme est développé en vb.net et j'utilise la classe System.Net.Mail.
Chaque utilisateur possède un profil dans lequel est enregistré entre autre ses identifiants de messagerie orange.
Actuellement 5 personnes utilisent le programme et peuvent envoyer des mails avec pièces jointes sans problème.

Le problème :
Depuis maintenant 2 semaines un des utilisateurs ne peut plus envoyer de mails avec des pièces jointes mais sans pièce jointe cela fonctionne.
Aucune erreur n'est renvoyée au moment de l'appel de la méthode mail.send(), cependant le destinataire ne reçoit pas le mail.
Je peux afficher le code que j'utilise mais je ne pense pas que cela vienne du code étant donné qu'il fonctionne pour tous les autres utilisateurs.

Ce que j'ai déjà testé :
Je me suis connecté au webmail orange et que j'ai pu envoyé un message avec pièce jointe, j'ai également pu le faire avec outlook.
J'ai essayé avec exactement le même paramétrage smtp/port/SSL que outlook mais rien y fait.

Mon hypothèse :
Je ne suis pas un spécialiste des protocoles de communication mais ce pourrait-il que cet utilisateur ait envoyé un mail avec un pièce jointe trop grosse et que le serveur soit bloqué ?

[Phil Rob]

Sais pas si ça t'aidera, mais le code suivant envoie bien ses mails, même avec pièces jointes :

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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
    Private Sub BEnvoi_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BEnvoi.Click
 
        Dim Mail As MailMessage
        Dim smtp As SmtpClient
        Dim Expediteur As String
        Dim Destinataire As String
 
 
        Try
            smtp = New SmtpClient("relay.proximus.be") ' Désignation d'un serveur SMTP autorisé sur l'ordi
            Mail = New MailMessage
            Mail.SubjectEncoding = UTF8Encoding.UTF8 ' Format de codage de l'objet
            Mail.BodyEncoding = UTF8Encoding.UTF8 ' Format de codage du message
            Mail.Subject = TObjet.Text  ' L'objet du message dans la TextBox
            Mail.Body = RTBMessage.Text ' Le message est écrit dans une RichTextBox
 
 
 
            Expediteur = "phr@alcatraz.be"
            Mail.From = New MailAddress(Expediteur) ' Désignation de l'expéditeur
 
            Destinataire = "scxstr@gmail.com"
            Mail.To.Add(New MailAddress(Destinataire)) ' Désignation de destinataire
 
            ''' !!! si nécessaire ....
            'smtp.Port = "25"
            'smtp.Credentials = New System.Net.NetworkCredential("Phil Rob", "PWD")
            'smtp.EnableSsl = False ' Chez moi, c'est FALSE
 
            For Each S As String In LBAttachement.Items ' Les CheminsEtNomsCompletsDesFichiers sont listés dans un ListBox
                Dim Attache As New Attachment(S)
                Mail.Attachments.Add(Attache)
            Next
 
            smtp.Send(Mail) ' Envoi du message
 
            Mail.Dispose()
 
        Catch ex As ApplicationException
            MessageBox.Show(ex.Message)
        Finally
            smtp = Nothing
            Try
                Mail.Dispose()
            Catch
            End Try
            Mail = Nothing
        End Try
 
    End Sub

Bon travail ...

[cedric.gassan]

Merci Phil pour ton code, malheureusement ça ne marche pas mieux.
Je pense que c'est un problème réseau, je vais essayer de voir avec notre FAI s'il peut me renseigner mais je n'y crois pas beaucoup.

[Phil Rob]

Je crois que là où fonctionne un autre logiciel de messagerie, "le mien" doit fonctionner aussi.
Peut-être dois-tu vérifier les paramètres (dont le port utilisé) pour le même compte dans cet autre logiciel et modifier les infos correspondantes dans le code que j'ai envoyé, dont ceux laissés en commentaires car pas nécessaire chez moi :

''' !!! si nécessaire ....
'smtp.Port = "25"
'smtp.Credentials = New System.Net.NetworkCredential("Phil Rob", "PWD")
'smtp.EnableSsl = False ' Chez moi, c'est FALSE

Bonne chance...

[cedric.gassan]

Phil,
Effectivement j'ai le même raisonnement que toi, si ca marche chez toi si j'utilise le même code avec le même paramétrage de la connexion au serveur SMTP il n'y a aucune raison que cela ne fonctionne pas.
Cependant ce n'est pas si simple ça va dépendre de beaucoup de paramètres :
- Ton pare-feu windows
- ton antivirus
- le pare-feu de ton Fournisseur d'acces Internet
- le paramétrage accepté par ton hébergeur d'adresse mail (smtp adresse, smtp port, SSL/TLS etc ...)
- la configuration de ton routeur.

et j'en oubli ^^ ...

Dans mon cas après pas mal avoir galéré j'ai réussi à le faire fonctionnement correctement, le problème ne semble pas ce situer dans le code étant donné qu'il fonctionne pour tous les autres utilisateurs.
En clair les autres utilisateurs ont également une adresse orange et le même paramétrage de connexion et de communication avec le SMTP (adresse : smtp.orange.fr/port : 25/ SSL : pas de connexion sécurisée).
Dans le doute j'ai tout de même essayé d'autres ports avec SSL et sans SSL.

Le problème ne vient pas de la connexion au serveur SMTP car je n'ai aucun message d'erreur et que l'envoi d'un mail sans piece jointe fonctionne.
Le problème n'est que lorsque j'envoie un mail avec une piece jointe, le destinataire ne recoit rien alors que le mail semble avoir été correctement livré au serveur SMTP.