Envoi de données depuis Excel vers lotus Notes
Publié: 24 Sep 2003 à 09:45Bonjour à toutes et à tous,J'utilise ceci afin d'envoyer des données vers Lotus Notes en créant automatiquement un mémo.Je souhaiterai connaître la syntaxe pour déclencher un accusé de réceptionMerci pour votre aide_________________________ ''Establish Connection to Notes Set objNotesSession = CreateObject("Notes.NotesSession") On Error GoTo exitErreurMail Set objNotesMailFile = objNotesSession.GETDATABASE("", "") objNotesMailFile.OPENMAIL Set objNotesDocument = objNotesMailFile.CREATEDOCUMENT Set objNotesField = objNotesDocument.APPENDITEMVALUE("Subject", EmailSubject) Set objNotesField = objNotesDocument.APPENDITEMVALUE("SendTo", EMailSendTo) Set objNotesField = objNotesDocument.APPENDITEMVALUE("CopyTo", EMailCCTo) Set objNotesField = objNotesDocument.APPENDITEMVALUE Set objNotesField = objNotesDocument.CREATERICHTEXTITEM("Body")