Bonjour,
j'ai mis en place un solution permettant d'envoyer des emails,
seulement, avec le serveurs de messagerie j'ai l'impression que ça passe moyen...
Quand j'utilise mon @dresse, pas de soucis.
par contre quand j'utilise l'@dresse de la personne qui est sur le même domaine que l’expéditeur,
le mail n'arrive pas a destination, et aucune erreur lors de l'envoie
je vous laisse un extrait du code pour voir s'il y a des discordances, parce-que la je vois pas.
avec le détail des paramètres si besoin
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 With My.Settings ' Creation du mail Dim Body As String = "Une erreur de température à était détéctée dans la chambre " & Chambre & " le " & Now.Date & " à " & Now.Hour & "h" & Now.Minute & "." ' Envoi du mail Try Dim email As New MailMessage(.Mail_Expediteur, .Mail_Destinataire1, .Mail_Objet, Body) Dim smtpMail As New System.Net.Mail.SmtpClient(.Mail_ServeurSMTP, .Mail_PortSMTP) 'sécurité Mail smtpMail.EnableSsl = .Mail_SSLSMTP smtpMail.Credentials = New Net.NetworkCredential(.Mail_UserSMTP, .Mail_PasswordSMTP) 'Envoie de l'email smtpMail.Send(email) Mail_envoyé(i) = True Catch ex As Exception MsgBox(ex.ToString) MsgBox("erreur lors de l'envoie de l'email au destinataire1" & vbCrLf & ex.ToString, MsgBoxStyle.Critical) End Try End With
Le seul changement qui opére est "Mail_Destinataire1",
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 ' Exedipeur/detinataire My.Settings.Mail_Destinataire1 = "destinataire.1@xxxxxx.net" '<-- seul changement My.Settings.Mail_Expediteur = "Expediteur@xxxx.net" ' Serveur SMTP My.Settings.Mail_ServeurSMTP = "smtp.auth.orange-business.com" My.Settings.Mail_PortSMTP = 587 My.Settings.Mail_SSLSMTP = False ' Compte sur le serveur SMTP My.Settings.Mail_UserSMTP = "xxxx@xxx.fr.fto" My.Settings.Mail_PasswordSMTP = "xxxxxxxxxxxxx"
si j'utilise mon @gmail, aucun problème.
Alors que si j'utilise l'@Societe la le mail se perd![]()
Partager