Domino 9 und frühere Versionen > ND6: Entwicklung

Dokumentverknüpfung in ein Dokument einfügen

(1/3) > >>

diwi:
Hallo zusammen,

ich möchte ein Link auf ein Dokument aus einer anderen DB in das gerade geöffnete einfügen.

Sub Click(Source As Button)
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim ws As New NotesUIWorkspace   
   Dim db1 As NotesDatabase
   Dim rtitem As NotesRichTextItem
   Dim doc As NotesDocument
   Dim currDoc As NotesDocument
   Dim test As String
   
   Set db = session.CurrentDatabase
   Set db1 = New NotesDatabase(db.Server, "testrun.nsf")   
   Set currDoc = ws.CurrentDocument.Document
   Set rtitem = New NotesRichTextItem( currDoc, "verknuepfung" )
   
   Forall x In currDoc.GetItemValue("Ref")
      Set doc = db1.GetDocumentByUNID(x)
      Call rtitem.AppendText(doc.No(0))
      Call rtitem.AppendText("-")
      Call rtitem.AppendText(Cstr(doc.Version(0)))
      Call rtitem.AppendDocLink( doc, doc.No(0))
      Call rtitem.AddNewline(1)
   End Forall
   
   Call currDoc.Save(False, False)
End Sub 

Nun, nach dem Code funktioniert das auch, aber nur unter bestimmten Bedingungen. Und zwar das geöffnete Dokument muss erst geschlossen und neu geöffnet werden, zusätzlich darf es beim Schliessen nicht gespeichert werden(sonst wird das RichTextItem gebügelt), damit der Link angezeigt wird.  :(

Gibt es da irgend eine andere Möglichkeit so etwas umzusetzen? Oder mache ich was falsch?

Bin dankbar für jeden Hinweiss!

Gruß

Dimitri

m3:
Genau so wirds gemacht.

diwi:
Der Weg ist aber ... na ich sage mal Suboptimal, da der Link halt nicht sofort im geöffnetem Dokument angezeigt wird. Da werden meine User meckern.   ;)

Deswegen wäre eine Lösung mit der man den Link im gerade bearbeiteten Dokument direkt anzeigen kann schon toll!  ;D

Gruß

Dimitri

Glombi:
Dann gehts nur mit Formelsprache.

Die relevanten Befehle sind @Command( [EditMakeDocLink] )  und @Command( [EditPaste] )

Andreas

Peter Klett:
Such mal hier im Forum. Bernhard (koehlerbv) hat hier mal was geschrieben, wie man einen Dateianhang mittels Profildokument sofort sichtbar einfügen kann, gleiches wird auch mit Links funktionieren

Navigation

[0] Themen-Index

[#] Nächste Seite