Domino 9 und frühere Versionen > ND8: Entwicklung

Mit Agent auf andere DB zugreifen

<< < (9/9)

yannick:
Okay, vielen Dank.
Ob wir überhaupt Zugriff auf diesen Server haben muss ich klären, denke aber schon.
Über die RunOnServer-Methode werde ich mich dann mal genau informieren, vielleicht ist das ja auch noch etwas für uns.
Also nochmal vielen Dank. Morgen ist das Meeting, danach werden wir (hoffentlich) wissen, ob wir diese Funktion einbauen (dürfen).

yannick:
So, unser Vorhaben wurde genehmigt, wir können voraussichtlich nächste Woche anfangen zu testen. Ich habe jetzt ein Test-Script aufgesetzt und wollte vorher hier nochmal nachfragen, ob es da vielleicht noch Verbesserungsbedarf gibt, da das ganze wirklich wichtig ist und ich erst seit etwa 3 Wochen in LS entwickle.
Die Situation ist jetzt die, dass wir in unserem Dokument einen Doclink zum Dokument in der anderen DB haben aus dem wir Daten ziehen wollen. Also hier was ich bisher habe:

--- Code: --- Dim ws As New NotesUIWorkspace
Dim db As New NotesDatabase("db-server", "db-filepath")
Dim docA As NotesDocument
Dim docB As NotesDocument
Dim rti As NotesRichTextItem
Dim rtnav As NotesRichTextNavigator
Dim rtlink As NotesRichTextDocLink
Set docA = ws.Currentdocument.Document
Set rti = docA.GetFirstItem("doclink")
Set rtnav = rti.CreateNavigator
If Not rtnav.FindFirstElement(RTELEM_TYPE_DOCLINK) Then
MessageBox "No doclinks in doclink item",, "No doclinks"
Exit Sub
End If
Set rtlink = rtnav.Getelement()
Set docB = db.Getdocumentbyunid(rtlink.Docunid)
        If docB Is Nothing Then
MessageBox "Document not found",, "No document"
Exit Sub
End If
Call docA.Replaceitemvalue("fieldA", docB.Getitemvalue("field_A"))
Call docA.Replaceitemvalue("fieldB", (docB.Getitemvalue("field_B") + docB.Getitemvalue("field_C"))*100)
        ...

--- Ende Code ---

Vielen Dank schonmal :)

klaussal:

--- Zitat ---Set docB = db.Getdocumentbyunid(rtlink.Docunid)
--- Ende Zitat ---

Danach unbedingt (!!) eine Fehlerbehandlung einbauen, falls nix gefunden wird, etc pp

yannick:

--- Zitat von: klauss am 24.08.12 - 09:31:23 ---Danach unbedingt (!!) eine Fehlerbehandlung einbauen, falls nix gefunden wird, etc pp

--- Ende Zitat ---
Genau das ist mir auch gerade noch aufgefallen. Schau bitte nochmal im Code oben, ich habe es editiert.
Danke dir.

umi:
Hi
Soweit ich mich erinnere gibt das getDocumentByUnid einen Error 4091 zurück, wenn die UNID nicht gefunden wurde.

Navigation

[0] Themen-Index

[*] Vorherige Sete