Hallo Zusammen,
ich möchte über eine Schaltfläche einen Anhang in mein Dokument importieren und an einer bestimmten Stelle in der Maske anzeigen lassen.
Leider gelingt mir das nicht.
Der Anhang wird stets am unteren Rand des Dokuments unter einer dünnen, schwarzen Linie angehängt.
Ich verwende (u.a.) die beiden folgenden Zeilen:
Set rtitem = New NotesRichTextItem ( doc, "Body" )
Set object = rtitem.EmbedObject ( EMBED_ATTACHMENT, "", filename)
Ob ich in der Maske ein RichText-Feld mit der Bezeichnung "Body" erstelle oder nicht hat keine Auswirkung.
Was mache ich falsch?
Gruß
Jens
Hi Bernhard,
klar - vielleicht habe ich das was als Gelegenheitsprogrammierer nicht verstanden.
Aber der Anhang wird doch angehängt - nur eben nicht in das Feld.
Wenn ich das Dokument geöffnet habe und das Script laufen lasse, dann passiert sichtbar natürlich nichts. Weil ja im Backend läuft...
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.Document
Schliesse ich das Dokument dann und öffne es erneut, dann ist der Anhang unten dran.
Oder bin ich jetzt völlig neben der Spur?
Gruß
Jens