Bonjour à tous,

Voici mon problème. Lorsque je tente d'envoyer un mail, tout semble bien aller, pas de message d'erreur et je suis redirergé vers ma page de remerciment. Par contre, le mail n'est pas envoyé. J'ai pourtant le code d'envoie d'un mail que tous les tutoriaux et tous les forums propose.

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
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="xxx@xxx.com"
myMail.To="zzz@zzz.com"
myMail.TextBody="This is a message."
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Name or IP of remote SMTP server
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="xxx.xxx.com"
'Server port
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25 
myMail.Configuration.Fields.Update
myMail.Send
set myMail=nothing
J'ai un tracqer de packets et j'ai l'impression que ca n'arrive meme pas a tenter de ce connecter au serveur smtp car il y a aucun packet envoyé lorsque je veux faire l'envois du mail.

Est-ce que quelqu'un aurait une petit idée de la raison car je commence vraiment à être décourager. Ça fait près d'une journée que je tente de corriger ce problème


Merci pour votre aide