Discussion :

[Daniel.C]

Bonjour à tous,

J'ai un problème pour envoyer des messages avec CDO en utilisant mon compte GMail. J'utilise le code suivant :

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
Sub CDO2()
Dim Adresse As String, MDP As String, Desti As String
Adresse = "xxx@gmail.com" '*** mon adresse mail - à modifier
MDP = "xxx" '*** mon mot de passe GMail - à modifier
Desti = "xxx@xxx.com" '*** adresse du destinataire - à modifier
Set cdomsg = CreateObject("CDO.message")
With cdomsg.Configuration.Fields
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'NTLM method
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
.Item("http://schemas.microsoft.com/cdo/configuration/smptserverport") = 587
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = Adresse
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = MDP
.Update
End With
' build email parts
With cdomsg
.To = Desti
.From = "mygmail@gmail.com"
.Subject = "the email subject"
.TextBody = "the full message body goes here. you may want to create a variable to hold the text"
.Send
End With
    Set cdomsg = Nothing
End Sub

qui me donne l'erreur :
Erreur d'exécution '-2147220973 (80040213)':
Le transport a échoué dans sa connexion au serveur.

L'erreur semble liée à une spécificité GMail (j'arrive à envoyer un message via CDO et Free.

Merci d'avance.

[casefayere]

Bonsoir Daniel,
sans garantie, je viens de lire

Port SMTP Gmail: 25 ou 465

donc si c'est ça, peut-être changer cette ligne

Code :

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

.Item("http://schemas.microsoft.com/cdo/configuration/smptserverport") = 587

en mettant le bon chiffre, je répète, sous réserve !!!

[casefayere]

ou ce lien qui aidera peut-être si tu ne le connais pashttps://support.google.com/mail/answer/13273

[Daniel.C]

@casefayere :

Non, même erreur
Je vais regarder le lien.
Merci.

[cerede2000]

As tu chercher sur le forum......
http://www.developpez.net/forums/d14...t/#post7968025

[Invité]

Bonjour,
Merci cerede2000 pour ce lien!

Il faut configurer cdo exactement comme ton client mail.

Je l'utilise depuis 15 ans déjà et il me rends encore service aujourd'hui.
Je l'utilise au travail pour envoyer de mail via gemail@entrepise. Com et mon Gmail perso sen problème.

De mémoire l'exemple que je fournir est justement configuré en gmail.

Si tu as d problème regarde ton client smtp, et je te donnerai un coup de pousse si besoin!

Ceci dit sur Google c'est un peut le bordel pour trouver mais il y a toutes les informations.

J'avais poste le lien sur le forum mais si je le retrouve je te le poste.

[cerede2000]

@rdurupt : Yes ! Ton exemple est Gmail c'est pour cela que je l'ai mis

[Daniel.C]

As tu chercher sur le forum......
http://www.developpez.net/forums/d14...t/#post7968025

Bonjour et merci. Oui on trouve une littérature abondante sur CDO. J'arrive à le faire fonctionner avec mon compte Free. C'est GMail qui me pose problème.Apparemment, je passe à côté de quelque chose.

@rdurupt : Yes ! Ton exemple est Gmail c'est pour cela que je l'ai mis

Plus exactement, c'est GoogleMail, il y a quelques différences.

Bonjour,
Merci cerede2000 pour ce lien!

Il faut configurer cdo exactement comme ton client mail.

Je l'utilise depuis 15 ans déjà et il me rends encore service aujourd'hui.
Je l'utilise au travail pour envoyer de mail via gemail@entrepise. Com et mon Gmail perso sen problème.

De mémoire l'exemple que je fournir est justement configuré en gmail.

Si tu as d problème regarde ton client smtp, et je te donnerai un coup de pousse si besoin!

Ceci dit sur Google c'est un peut le bordel pour trouver mais il y a toutes les informations.

J'avais poste le lien sur le forum mais si je le retrouve je te le poste.

Merci. Le pire, c'est que j'ai repris les paramètres de mon compte GMail défini dans Outlook :
smtp.gmail.com, port 587...