Folgendes Setup:
Ein Dokument mit eingebettetem Worddokument und einigen Feldern.
Die Felder werden beim Öffnen des eingebetteten Objekts ins Dokument geschrieben (Datenübernahme).
Das Öffnen des Dokuments möchte ich nun als Script in eine Schaltfläche packen.
Hier der Schaltflächencode:
Code
Dim s As New notessession
Dim doc As notesdocument
Dim item As Variant
Dim ws As New notesuiworkspace
Dim ui As notesuidocument
Dim WordObjekt As Variant
Dim realObject As Variant
Set ui=ws.currentdocument
Set doc=ui.document
Set item=doc.getfirstitem("Vorlageobjekt")
Set WordObjekt = item.embeddedobjects(0)
Set realObject=WordObjekt.activate(True)
Call WordObjekt.doVerb("&Bearbeiten")
Alles anzeigen
Word wird geöffnet, das Dokument wird für Sekundenbruchteile angezeigt und dann ist es weg... (die Sekundenbruchteile reichen nicht um zu sehen ob die Daten wirklich übernommen wurden. Wenn ich das Object direkt öffne gehts aber).
Wie kann ich das Dokument anzeigen lassen?