DominoArea.org [Archive]

J'ai un problème je n'arrive pas à recopier le champ texte riche "EmpreinteSignature" de doc, dans le champ texte riche "Saisie" de doc1.Le code ci dessous s'éxécute, pas d'erreur, mais rien ne se passe.Si quelqu'un voit une erreur, merci d'avance----------------------------------------------------------------------Dim session As New NotesSession Dim uiws As New NotesUIWorkspace Dim uiDoc As NotesUIDocument Dim doc1 As NotesDocument Dim db As NotesDatabase Dim dc As NotesDocumentCollection Dim doc As NotesDocument Dim Signature As NotesRichTextItem Set uiDoc = uiws.currentDocument Set doc1 = uiws.CurrentDocument.document uidoc.editmode =True ' passage en mode edition ' ajout de la signature Set db = session.currentdatabase Set dc = db.AllDocuments Set doc = dc.getfirstdocument Set signature = doc.GetFirstitem("Empreintesignature") signature.CopyItemToDocument doc1,"Saisie"