Discussion :

[wilfried_42]

Bonjour à tous

j'ai un problème avec la méthode CDO et je ne comprends pas, je l'utilise au boulot, çà fonctionne, et chez moi çà plante.

l'erreur : Pièce jointe 39413

j'ai bien coché : Microsoft CDO for exange 2000 Library

voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public Sub Send_mail(Obj As String, txt As String, aqui As String, dequi As String)
    Dim CdoMessage As CDO.Message
    Set CdoMessage = New CDO.Message
    With CdoMessage
        .Subject = Obj
        .From = dequi
        .To = aqui
        .CC = ""
        .BCC = ""
        .TextBody = txt
        .Send
    End With
    Set CdoMessage = Nothing
End Sub

Malheureusement , je ne retourne pas au boulot avant 2009

Merci à vous pour vos réponse

Cordialement

[pgz]

Bonjour Wilfried.

Juste une idée : regarde la valeur de la constante cdoSendUsingMethod.
Ca ressemble drôlement à un problème de configuration CDO...

PGZ

[wilfried_42]

salut pgz et merci pour ta réponse

Code :

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

        MsgBox cdoSendUsingMethod

me renvoie

Code :

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

http://schemas.microsoft.com/cdo/configuration/sendusing

je précise la différence de config
au boulot :
Windows 98 (Hé oui ils sont à la rue)
Internet Explorer
Chez moi :
Vista
Google Chrome et actuellement IE8 en navigateur prioritaire (Faisant actuellement un petit site Internet je suis obligé pour la compatibilité)

[pgz]

A mon avis au boulot tu dois avoir par exemple une connection Exchange qui fonctionne.
Chez toi tu veux passer par un serveur SMTP. Il faut reconfigurer.
Regarde cet article qui pourrait bien te donner des idées.

Tu trouveras d'autres articles sur MS A&S.

Cordialement,

PGZ

[wilfried_42]

re:

Je planche, je planche et je ne trouve pas, je suis même retourné au boulot pour voir la différence : je précise donc les différences entre les 2 systems (il en a d'autres)
Au boulot : Windows 98, Excel 2002 (xp standard), ordinateur sous réseau, accès internet Via Intranet, connexion filaire.
Chez moi : Vista, Excel 2002 (Xp Pro), Pas de réseau, Internet Via LiveBox, connexion wifi

au boulot j'ai outlook mais pas chez moi (je vais l'installer) et voir ce que je peux faire.

[pgz]

au boulot j'ai outlook mais pas chez moi (je vais l'installer) et voir ce que je peux faire.

Cela pourrait bien être utile car je crois que CDO travaille avec MAPI.

PGZ