Die Lösung scheint nicht in Sicht zu sein. Dabei handelt es sich doch wieder um eine Funktion, die normalerweise ganz locker laufen müsste.
Was soll das Script machen ? = nur den Inhalt eines Richtext-Feldes in ein anderes kopieren. Im Richtext-Feld befinden sich Fotos, die per Copy & Paste eingefügt wurden. ---> laut debugger existiert im Richtext-Feld nicht mal ein Bild. Richtig gut. Jetzt habe ich bei IBM ein Krücke gefunden, wo man über ein virtuelles NotesDocument gehen muss, weil ein Backend doc aus dem UIDoc nicht funktioniert. ADT Object Fehler. Also habe ich es so versucht.
Code:
Set rtitem = backdoc.GetFirstItem("bb_fotos")
Call uidoc.Close
Call tempdoc.CopyItem( rtitem, "Body" )
Set temprtitem = tempdoc.GetFirstItem("Body")
Set newdoc = db.CreateDocument
newdoc.form="print"
newdoc.bb_reportno = uidoc.FieldGetText("bb_reportno")
Call newdoc.CopyItem( temprtitem, "bb_fotos" )
Set puidoc = workspace.EditDocument(False, newdoc)
Fehlermeldung: Element des Dokuments nicht gefunden.
Habt Ihr das schon mal gelöst ?