Discussion :

[Clemiou]

Bonjour à tous

Dans le cadre d'un projet, je dois permettre à un utilisateur d'envoyer des mails.
Mon code est le 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
 
              Dim Envol As Outlook.Application
              Dim Env As Outlook.MailItem
              'Creation d'un objet de type message
              Set Envol = New Outlook.Application
              Set Env = Envol.CreateItem(olMailItem)
              'Destinataire
              Env.To = Me![MailPerss_Envoyer_Mess]
              'Objet du Message              
              Env.Subject = Me![ObjetMess]
              'Corps du Message
              Env.Body = Me![Contenu_Mess_EnvoyerMess]
              'Envoi du Message
              Env.Send
              'Libération de l'objet
              Set Env = Nothing
              Set Envol = Nothing

MailPerss_Envoyer_Mess, ObjetMess et Contenu_Mess_EnvoyerMess correspondent aux zones de textes recuperant les informations (adresse, objet, contenu...)
Lorsque j'execute le code, il me retourne:

Code :

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

1
2
Erreur d'execution '287'
Erreur définie par l'application ou par l'objet

A quoi cela est-ce du?
Merci d'avance de votre aide

[Domi2]

Bonjour,

Tu as bien référencé la librairie Microsoft Outlook ?

Domi2

[Clemiou]

Bonjour,

Tu as bien référencé la librairie Microsoft Outlook ?

Domi2

Bonjour
J'ai bien dans Outils/Reference: Microsoft Outlook 12.0 Object Library

[Domi2]

Re,

Ben...

Tu as compilé ?

Tu n'as pas de références marquées manquantes ?

Quelle est la ligne qui renvoie l'erreur ?

Domi2

[Clemiou]

Re,

Ben...

Tu as compilé ?

Tu n'as pas de références marquées manquantes ?

Quelle est la ligne qui renvoie l'erreur ?

Domi2

re,

Il me renvoie l'erreur sur la ligne:

Code :

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

Env.Send

Pas de references manquantes

[Domi2]

Re,

Sorry, mais j'ai pas mieux... et j'ai pas Outlook ici, donc pas moyen de tester...

Au passage, tu indique "12" comme no de référence. Vous utilisez une version 2007 des 2 programmes ?

As-tu éventuellement repris le code intégral de la FAQ pour voir quel résultat cela donnait ?

Domi2