Domino 9 und frühere Versionen > ND8: Entwicklung

DocLink aus RichTextItem auslesen

(1/1)

buzi:
Hallo zusammen,

wie kann ich denn den Rückweg von appendDocLink gehen? Also DocLink im RichTextItem ablegen ist klar.


--- Code: ---Call rtitem.AppendDocLink(kontaktDoc, "Kontakt")
--- Ende Code ---

Und was, wenn ich aus dem RichTextItem wieder das Dokument herausholen will?

Mein Versuch:


--- Code: --- Dim rtKontakt As NotesRichTextItem
Dim rtEmbObj As NotesEmbeddedObject

Set rtKontakt = doc.GetFirstItem("Kontakt")
Set rtEmbObj = rtKontakt.Embeddedobjects(0)

--- Ende Code ---

Nur, wie bekomme ich aus dem NotesEmbeddedObject den DocLink bzw. das NotesDokument heraus? Ich habe schon viel gesucht, mit Sicherheit weis einer von euch wo die Lösung eh schon steht.... oder??

DANKE!

ascabg:
Hallo,

Eventuell bringen dich ja diese beiden Klassen weiter.

NotesRichtTextNavigator und NotesRichTextDocLink


Andreas

buzi:
Danke, die Lösung ist einfach. Ich hatte den Navigator schon gesehen, aber nicht entdeckt, dass man sich dort die Objekte direkt raus holen kann.


--- Code: --- Set rtKontakt = angDoc.GetFirstItem("Kontakt")
Set rtNav = rtKontakt.CreateNavigator()
Set rtDocLink = rtNav.GetFirstElement(5)

If rtDocLink Is Nothing Then
MessageBox "Es ist kein Dokument zugeordnet!", 48, "Aktion nicht möglich"
Exit Sub
End If

universalIDAdr = rtDocLink.Docunid

        ...


--- Ende Code ---

Navigation

[0] Themen-Index