Domino 9 und frühere Versionen > ND6: Entwicklung

embed attachment per lotus script mit icon

(1/1)

Green:
ich möchte eine datei mittels lotus script backend einem dokument anhängen, so wie es der command @Command([EditInsertFileAttachment]) macht.
die datei wird auch mittels script angehängt aber im unterschied zur formula mit einem hässlichen grauen icon.

kennt jemand eine lösung um das icon auch backend hinzukriegen?

mein code:

Dim session As New NotesSession
Dim db As NotesDatabase

Set db = session.CurrentDatabase
Dim doc As New NotesDocument(db)
Dim rtitem As New NotesRichTextItem(doc, "Body")

doc.Form = "frmTest"
Call rtitem.EmbedObject(EMBED_ATTACHMENT,"","c:\Folder.gif")
Call doc.Save(True,False)

Axel:
Das hatten wir hier schon öfters.

Fazit: mit Backend-Funktionen ist das nicht zu machen.


Axel

Navigation

[0] Themen-Index