Il semble que les WEBMAIL réagissent différemment à l'envoie de mail depuis une page WEB:
Avec gmail et le code suivant, cela fonctionne mais les messages envoyés sont enregistrés dans la boite d'envoi de gmail qui en plus limite le nombre de mail que l'on peut envoyer
Avec Free le code suivant est suffisant mais je suis limité en nombre de mails que je peux envoyer par heure et par jour; or je voudrais envoyer environ 4000 mails
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com" iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smptserverport") = 465 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "mon identifiant" iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "mon password"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.free.fr" iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
Avec mail-a.easy-management.net, qui prétend ne pas avoir de limite, rien ne va plus et j'ai ce code d'erreur 80040213. Le code est le suivant:
ce qui d'autant plus surprenant c'est que je peux envoyer un mail via mail-a.easy-hebergement.net à partir de Thunderbird sur mon ordinateur mais que cela ne passe pas à partir de ma page WEB.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.mail-a.easy-hebergement.net" iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smptserverport") = 587 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "identifiant" iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "password"
Je n'arrive pas à trouver le point de blocage.
Partager