OVH Cloud OVH Cloud

SendUsing non valide

8 réponses
Avatar
JièL Goubert
Salutatous

en utilisant la procédure ci dessous dans un VBA Word, j'obtiens une
insulte qui dit
---------------
Erreur d'exécution '-2147220960 (80040220)'
La valeur de configuration "SendUsing" est non valide.
-------------

voici le code en question, repris sur le site en "transmutation" ;-) de
3stone/arnaud (faut que je remette à jour mes liens moi)

-----------------
Sub SendMailCDO()
Dim Cdo_Message As Object
Set Cdo_Message = CreateObject("CDO.Message")
With Cdo_Message
.To = "bla.bla@mondomaine.fr"
.From = "bla.bla2@mondomaine.fr"
.Subject = "Le Sujet"
.TextBody = "Le Corps du message"
.AddAttachment ("C:\Classeur1.xls")
.Send
End With
Set Cdo_Message = Nothing
End Sub
----------------

Une idée sur ce que je fais de pas bien, voire de carrément mal ?

Merci bôcoup

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr

8 réponses

Avatar
Pierre CFI [mvp]
salut jiel
tu as bien les mémes réfs dans word que dans access

--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"JièL Goubert" a écrit dans le message de news:
Salutatous

en utilisant la procédure ci dessous dans un VBA Word, j'obtiens une insulte qui dit
---------------
Erreur d'exécution '-2147220960 (80040220)'
La valeur de configuration "SendUsing" est non valide.
-------------

voici le code en question, repris sur le site en "transmutation" ;-) de 3stone/arnaud (faut que je remette à jour mes liens moi)

-----------------
Sub SendMailCDO()
Dim Cdo_Message As Object
Set Cdo_Message = CreateObject("CDO.Message")
With Cdo_Message
.To = ""
.From = ""
.Subject = "Le Sujet"
.TextBody = "Le Corps du message"
.AddAttachment ("C:Classeur1.xls")
.Send
End With
Set Cdo_Message = Nothing
End Sub
----------------

Une idée sur ce que je fais de pas bien, voire de carrément mal ?

Merci bôcoup

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr


Avatar
JièL Goubert
Bonjoir© Pierre CFI [mvp]

Le 21/12/2005 15:50 vous avez écrit... :
salut jiel
tu as bien les mémes réfs dans word que dans access


argh... j'en sais rien du tout...
J'ai juste lu "On peut s'affranchir de référencer la bibliothèque avec
la syntaxe suivante :", donc pensé (naïvement) que ça fonctionnait
partout dans tous les cas...

me trompais-je ?

Faut que je coche qqchose dans Outils, Références ? Quoi donc alors ?
faut dire que la liste est longuette ;-)

Merci

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr

Avatar
Pierre CFI [mvp]
oui, mais là c'est différent, on est en Belgique
je dis çà pour faire réagir 3stone, lui sait, moi pas

--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"JièL Goubert" a écrit dans le message de news: %
Bonjoir© Pierre CFI [mvp]

Le 21/12/2005 15:50 vous avez écrit... :
salut jiel
tu as bien les mémes réfs dans word que dans access


argh... j'en sais rien du tout...
J'ai juste lu "On peut s'affranchir de référencer la bibliothèque avec la syntaxe suivante :", donc pensé (naïvement) que ça
fonctionnait partout dans tous les cas...

me trompais-je ?

Faut que je coche qqchose dans Outils, Références ? Quoi donc alors ? faut dire que la liste est longuette ;-)

Merci

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr



Avatar
3stone
Salut,

"JièL Goubert"
[...]
| voici le code en question, repris sur le site en "transmutation" ;-) de
| 3stone/arnaud (faut que je remette à jour mes liens moi)


au moins on peut dire que tu suis ;-))



|
| Une idée sur ce que je fais de pas bien, voire de carrément mal ?


Tu as bien la "windowssystemcdosys.dll" sur ta bécanne ?

éventuellement la "registrer" !

sinon, je ne vois pas le problème que Word aurait...
car le code fonctionne du feu de dieu !


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
JièL Goubert
Bonjoir© 3stone

Le 21/12/2005 19:36 vous avez écrit... :
Salut,

"JièL Goubert"
[...]
| voici le code en question, repris sur le site en "transmutation" ;-) de
| 3stone/arnaud (faut que je remette à jour mes liens moi)


au moins on peut dire que tu suis ;-))


j'essaye du moins ;-)

Tu as bien la "windowssystemcdosys.dll" sur ta bécanne ?


oui mais dans system32

éventuellement la "registrer" !


fait, mais pas de changement

sinon, je ne vois pas le problème que Word aurait...
car le code fonctionne du feu de dieu !


ben zut alors :-(
En fait j'avais donné le lien à un utilisateur de Word et ce dernier
nous a dis que ça n'allais pas. J'ai donc testé sur mon poste et
effectivement j'ai le même soucis...

Bon, j'avoue que la j'ai un handicap sur ce poste (au boulot) c'est que
je n'ai pas Outlook, mais il me semblait bien que justement ce dernier
n'etait pas neccessaire en passant par CDO...

Si quelqu'un avait une idée pour m'aider à faire fonctionner ce code
chez moi, je lui en serait trés reconnaissant.

Encore merci pour vos aide.

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr

Avatar
3stone
Salut,

"JièL Goubert"
[...]
| En fait j'avais donné le lien à un utilisateur de Word et ce dernier
| nous a dis que ça n'allais pas. J'ai donc testé sur mon poste et
| effectivement j'ai le même soucis...
|
| Bon, j'avoue que la j'ai un handicap sur ce poste (au boulot) c'est que
| je n'ai pas Outlook, mais il me semblait bien que justement ce dernier
| n'etait pas neccessaire en passant par CDO...


J'ai fait l'essai suivant :
Décocher toutes les références (en dehors de VBA et Access obj lib)

La dll utilisée est la cdosys.dll (Microsoft CDO for Windows Library) qui à la version 6.2.2.0

et en yeutant un peu... quelques dll qu'elle pourrait appeller :
OLEAUT32.dll , ole32.dll , WININET.dll , urlmon.dll , INETCOMM.dll


Pour Outlook, pas installé chez moi non plus !


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Salut JièL

A tout hasard, essaye de mettre Outlook Express comme messagerie par défaut puis remettre Outlook Office comme messagerie par
défaut.

J'avais déjà testé sous word et ça fonctionnait.
J'avais même testé sous Outlook Office et ça fonctionnait aussi !!

ah mais tu dis que Outlook n'est pas installé ?.... alors je crois qu'il faut simuler le serveur smtp en utilisant la dernière
fonction GetSMTPServerConfig()

--
A+
Arnaud
---------------------------------------------
infos, conseils et liens : http://www.mpfa.info
---------------------------------------------


"JièL Goubert" a écrit dans le message de news:
Bonjoir© 3stone

Le 21/12/2005 19:36 vous avez écrit... :
Salut,

"JièL Goubert"
[...]
| voici le code en question, repris sur le site en "transmutation" ;-) de
| 3stone/arnaud (faut que je remette à jour mes liens moi)


au moins on peut dire que tu suis ;-))


j'essaye du moins ;-)

Tu as bien la "windowssystemcdosys.dll" sur ta bécanne ?


oui mais dans system32

éventuellement la "registrer" !


fait, mais pas de changement



Avatar
JièL Goubert
Bonjoir© Anor

Le 22/12/2005 21:33 vous avez écrit... :
Salut JièL

A tout hasard, essaye de mettre Outlook Express comme messagerie par défaut puis remettre Outlook Office comme messagerie par
défaut.


J'ai tenté avec toutes les messagerie à ma dispo, mais je pense que le
pb est du au fait que je suis (pour les tests) en entreprise, et que
donc soucis avec le smtp (que je ne connais pas)

J'avais déjà testé sous word et ça fonctionnait.
J'avais même testé sous Outlook Office et ça fonctionnait aussi !!


Chez moi ça fonctionne effectivement trés bien, mais je me demande bien
quel SMTP il utilise ?!

ah mais tu dis que Outlook n'est pas installé ?.... alors je crois qu'il faut simuler le serveur smtp en utilisant la dernière
fonction GetSMTPServerConfig()


je vais regardé, en attendant j'ai trouvé ça qui m'a l'air de compléter
le code précédent :
http://www.asp-php.net/tutorial/asp-php/email.php?numsg7016&resum=no#tch

même si l'erreur persiste, je pense que c'est une piste.

Merci à tous pour vos aides.

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr