Domino 9 und frühere Versionen > ND7: Entwicklung

Anhänge in NotesEmbeddedObject

(1/1)

MichaStg29:
Hi,

wie kann ich per LotusScript einen Anhang in einem NotesEmbeddedObject per
DoVerb(?) anzeigen lassen ?

Beispiel:
Dim doc As NotesDocument
Dim rtitem As Variant
Dim object As NotesEmbeddedObject
'...set value of doc...
Set rtitem = doc.GetFirstItem( "Body" )
If ( rtitem.Type = RICHTEXT ) Then
  Set object = rtitem.GetEmbeddedObject( "City picture" )
  call object.DoVerb("?")
End If

Welcher String ist mitzugeben ?

Oder muss mit object.Activate gearbeitet werden ?

Die Hilfe ist hier nicht eindeutig.

koehlerbv:
Ich befürchte, Du bist hier auf dem falschen Dampfer, Micha: Den exakten Parameter-String musst Du der Methode des verwendeten OLE-Servers entnehmen. Und Du hast nicht einmal angeben, welche Anwendung Du hier als OLE-Server verwendest.

Bernhard

MichaStg29:
Es geht einfach nur darum per Lotus-Script einen bestimmten
Anhang innerhalb von Notes zu öffnen bzw. anzuzeigen.

Entpsrechend dem Befehl @command([ObjectOpen])

Gibt es eine einfache Möglichkeit ?

koehlerbv:
Mit der DoVerb-Methode warst Du also wirklich auf dem falschen Dampfer - das taugt nur für OLE (steht aber auch eindeutig so in der DesignerHelp - und für den @Command steht dort gleiches!!).

In LS: Wenn es ein Attachment ist, dann Anhang in ein Temp-Verzeichnis lösen und anschliessend öffnen. Beispiele gibt es hier im Forum als auch i nder DesignerHelp.

Bernhard

Navigation

[0] Themen-Index