Creation message Lotus 6.5 sans envoi

[Compte Supprimé 979]

Bonjour à tous,

Avec Excel, j'aurais besoin de créer un message sur Lotus avec :
- sa pièce jointe
- l'accusé de réception
mais sans l'envoyer.

J'aimerais que ce message soit ouvert et soit près à être modifié

Je tourne en rond, j'ai les neurones qui chauffent

Merci de votre aide.

 

[tototiti2008]

Re : Creation message Lotus 6.5 sans envoi

Bonjour BrunoM45,

d'après le code qui se trouve :

AIDE SUR L'AUTOMATION LOTUS NOTES SOUS VB , Source N°18363 Visual Basic, VB6, VB.NET, VB 2005, VB

un truc comme ça :

[COLOR=#008000]'Affichage du mail dans Lotus Notes[/COLOR] 
[COLOR=#0000ff]Set[/COLOR] workspace = CreateObject("[COLOR=#8b0000]Notes.NotesUIWorkspace[/COLOR]") 
[COLOR=#0000ff]Call[/COLOR] workspace.EditDocument([COLOR=#0000ff]True[/COLOR], beDoc).FieldSetText("[COLOR=#8b0000]Body[/COLOR]", body)

 

[Compte Supprimé 979]

Re : Creation message Lotus 6.5 sans envoi

Salut Tototiti2008,

Merci pour la réponse, ça marche

Je fini de bidouiller mon code et je le mettrais en ligne par la suite.

A+

 

[tototiti2008]

Re : Creation message Lotus 6.5 sans envoi

Re,

c'est sûr que c'est moins instinctif que le .Display d'Outlook