Discussion :

[darkphenx]

Bonjour,

Je voudrai envoyer un mail avec Lotus :
J'ai trouvé sur Internet le code nécessaire :
***************************

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
 Dim Maildb As Object      'La base des mails
    Dim UserName As String    'Le nom d'utilisateur
    Dim MailDbName As String  'Le nom de la base des mails
    Dim MailDoc As Object     'Le mail
    Dim AttachME As Object    'L'objet pièce jointe en RTF
    Dim Session As Object     'La session Notes
    Dim EmbedObj As Object    'L'objet incorporé
 
    'Crée une session notes
    Set Session = CreateObject("Notes.NotesSession")
 
    '*** Cette ligne est réservée aux versions 5.x et supérieur : ***
    Session.Initialize (Password)
 
    'Récupère le nom d'utilisateur et crée le nom de la base des mails
    UserName = Session.UserName
    MailDbName = Left$(UserName, 1) & Right$(UserName, (Len(UserName) - InStr(1, UserName, " "))) & ".nsf"
 
    'Ouvre la base des mails
    Set Maildb = Session.getDatabase("", MailDbName)
    If Not Maildb.ISOPEN Then Maildb.Openmail

....
***************************
Mais sur la ligne Set Session = CreateObject("Notes.NotesSession"), j'ai l'erreur 429 "Un composant Active X ne peut pas créer d'objet.
Je peux créer des objets Excel, Outlook...
J'ai ajouté dans la liste des réferences la bibliothéque Lotus Notes.

Je pense que le code est bon car trouvé à plusieurs endroits sur le net mais comme je ne peux pas ouvrir de session, le code s'arrete.

Merci d'avance,

[Kloun]

Bonjour,

L'ajout de la ref dans le projet ne sert à rien (tu fais du late binding)

Lotus Notes est-il ouvert quand tu exécutes le code ?

[darkphenx]

Oui Lotus Notes est ouvert (version 7.0)

[Kloun]

J'utilise le même code et il fonctionne nickel avec Notes 6.5.

Faudrait essayer sur un autre poste pour voir si c'est pas ton poste qui débloque.

[Invité]

Bonjour

Utilises-tu le client lourd (en local) ou en léger (par le web) ?

Il me semble qu'en client léger il y'a des soucis.

Starec

[darkphenx]

Non, c'est en réseau mais il s'agit bien du client local Notes.

J'avais déjà fait le même système avec Outlook et cela fonctionnait nickel.

J'ai vu que peut être problème avec Outlook ?
Il y avait Outlook avant sur le poste. Mais ils ont remplacé leur messagerie par Notes.
Outlook n'est plus utilisé mais tjrs là pour les anciens mails.

Merci encore,