Domino 9 und frühere Versionen > ND6: Entwicklung

Datei anhängen aus Visual Basic 6 Aplikation

(1/2) > >>

Dominic Hoffmann:
Hallo zusammen.
Weis jetzt nich ob ich hier im richtigen Thread bin.

Habe da ein, Problem beim Anhängen von Dateien in einem Lotus Notes Dokument.
Die Datei an sich ist eine XLS-File, wird auch angehängt und kann geöffnet werden aus Notes.
Das einzige was komisch ist, das nicht, wie ansonsten bei Notes üblich, das icon der Datei genommen wird, sonsdern ein graues Icon. Weis jetzt nicht wie ichs beschreiben soll, ihr wisst wahrscheinlich was ich mein.

Also mein Aufruf zum Anhängen sieht folgendermassen aus (alles andere hab ich mal weggelassen, da es zu unübersichtlich werden würde ansonsten):


--- Code: ---Set rtItem = objDoc.GetFirstItem("Body")
           
'Tempusliste einhängen
rtItem.EmbedObject EMBED_ATTACHMENT, "", sTmpPath
Call objDoc.Save(True, True)
--- Ende Code ---

Weis einer was cih da falsch mach oder was noch fehlt?
Müsste ja irgenwas geben, womit ich Notes mitteilen kann, welches Icon angezeigt werden soll.

Gruß

Glombi:
Das geht glaube ich nicht. Auch wenn man mittels Script Attachments ins Backend hängt, werden die "grauen" Icons angezeigt. Es muss was spezfisches im Rich Text Feld bzw. im UI Dokument sein, was für die korrekte Darstellung sorgt.

Andreas

Dominic Hoffmann:
Bei der Funktion:

--- Code: ---Function EmbedObject(lType As EMBED_TYPE, pClass As String, pSource As String, [pName As String]) As NotesEmbeddedObject

--- Ende Code ---

Hats ja unteranderem den Parameter pClass.
Was wird dort den erwartet? weist du das?
Im moment übergeb ich nen NullString.
Das muss aber doch gehen, weil Notes es ja auch macht.
Und ich denk nicht das da andere Funktionen wie die Exportierten verwendet werden.

Glombi:
siehe dazu auch
Attachment per Script im Frontend anhängen

Glombi:
Zu Deiner Frage nach class:

Set notesEmbeddedObject = notesRichTextItem.EmbedObject( type%, class$, source$, [ name$ ] )

Parameters

type%
Constant. Indicates if you want to create an attachment, an embedded object, or a object link.  May be any of the following:
EMBED_ATTACHMENT (1454)
EMBED_OBJECT (1453)
EMBED_OBJECTLINK (1452)

class$
String.
If you are using EMBED_OBJECT and want to create an empty embedded object from an application, use this parameter to specify the name of the application (for example, "1-2-3 Worksheet") and specify an empty string ("") for source$. Case-sensitive.
If you are using EMBED_OBJECTLINK or EMBED_ATTACHMENT, specify an empty string ("").

HTH
Andreas

Navigation

[0] Themen-Index

[#] Nächste Seite