RTF Feld kopieren

[SebastianB]

Hi!

Ich öffne mit einem Script eine DialogBox. Und möchte in dieser Dialogbox je nach Auswahl den Inhalt eines RTF Feldes (aus einem anderen Dokument ein Feld innerhalb der Dialogbox kopieren). Wie geht das?

Code

Sub Click(Source As Button)
	
Dim ws As New notesuiworkspace
Dim uidoc As notesuidocument
Set uidoc=ws.currentdocument
Set doc = uidoc.Document
	
temp =  uidoc.FieldGetText("LayoutID")
	
Dim s As New NotesSession
Dim db As NotesDatabase
Set db = s.CurrentDatabase
	
Set layoutdoc = db.GetDocumentByUNID( temp )	
	
Call doc.LayoutPictureMod.AppendRTItem( layoutdoc.LayoutPicture ) --> geht leider nicht...
	
End Sub

[Thomas Schulte]

Irgendwie klaffen deine Beschreibung dessen was du tun willst und dein Source Code Meilenweit auseinander.

Das was du da tun will, nämlich wksp.dialogbox(Parameter) und dann in der Dialogbox quasi weiter auswählen das funktioniert so nicht. Du kannst aber z.B. die Dialogbox durch eine Normales Dokument ersetzen und dann in diesem Dokument mit Script RTInhalte reinkopieren. Der Haken daran ist, das du das Dokument abspeichern musst (auch in R6 denke ich, obwohl ich mir bei 6.5 da jetzt nicht hundertprozentig sicher bin meine ich doch irgendwo gelesen zu haben das der Copy/Speichern/Neuaufruf Zyklus nicht mehr nötig wäre).  Je nachdem was du dann damit anstellst musst du halt am Ende dafür sorgen das dein Dokument aus der Datenbank wieder verschwindet.

[diali]

habs mit Notes 6 noch nicht ausprobiert, aber Thomas Schulte meinte bestimmt

Code

NotesUIDocument.Refresh([IncludeRichTextItems])

[Thomas Schulte]

habs mit Notes 6 noch nicht ausprobiert, aber Thomas Schulte meinte bestimmt

Code

NotesUIDocument.Refresh([IncludeRichTextItems])

Gruß
Dirk

Genau wusste ich doch das da was war.