Discussion :

[Fildelyon]

Bonsoir à la communauté.

Voici mon problème :

Mon domaine (et mes adresses emails) est hébergé chez OVH
Mon serveur Pro étais derrière une freebox : ces paramètres sur l'objet CDO marchaient nickel :

Code :

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

1
2
3
4
5
6
7
8
9
    With oCdo
        With .Configuration.Fields
 
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.free.fr"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = "25"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "adresse@ovh.fr""
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "mdp

Nous avons migrer vers une solution complète OVH (Phonie + internet) : je suis donc à présent derrière une box OVH.

J'ai tenté plusieurs code, donc celui-ci qui me paraissait logique :

Code :

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

1
2
3
4
5
6
7
8
9
    With oCdo
        With .Configuration.Fields
 
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "ssl0.ovh.net"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = "587"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "adresse@ovh.fr""
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "mdp

Mais je me retrouve avec cette erreur que je parviens pas à identifier :



>> Notez la présence des guillets autours du numéro de port ... j'ai vu des exemples sans ces guillemets, mais je confirme qu'avec Free et les guillemets, ça marchait
>> J'ai essayé avec et sans les guillemets
>> J'ai changé les ports (25 ou 587)
> Je suis revenu avec le smtp.free.fr en utilisant le port 587

Tout cela sans effet.

Avez-vous une piste ?

Merci de votre aide !

[Fildelyon]

Je pense que je me suis trompé de rubrique : un Modérateur peut-il déplacer ce post, sans doute dans "Forum VBA Access"

Désolé, et Merci

[hyperion13]

Salut
Si sur Free server sortant = 25, sur Ovh n'est-ce pas 465 ?
Vos identifiants de connexion (nom utilisateur + mdp) sont-ils correctes ?
Une explication de l'erreur ici (Diagnosing Common Problems and Errors).

[Fildelyon]

Merci pour réponse hyperion13.
Fort intéressant le "Diagnosing Common Problems and Errors" : je garde au chaud !


En grattant un peu de partout, j'ai testé une autre adresse de serveur smtp d'ovh et ça marche.

Code :

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

1
2
3
4
5
6
7
8
9
With oCdo
        With .Configuration.Fields
 
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "ns0.ovh.net"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = "587"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "adresse@ovh.fr""
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "mdp

Donc ssl0.ovh.net pour Outlook, mais ns0.ovh.net pour CDO !

Elle est tordue celle-là !!

Bonnes vacances la communauté !