Das Notes Forum
Domino 9 und frühere Versionen => ND7: Entwicklung => Thema gestartet von: MichaStg29 am 16.09.09 - 15:22:03
-
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.
-
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
-
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 ?
-
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