Domino 9 und frühere Versionen > ND6: Entwicklung

fehlender Bezug zu uidoc

(1/2) > >>

Bille:
Ich hab wieder ein Verständnisproblem mit dem NotesUIDocument.

In einer Datenbank habe ich eine "Auswertungsmaske", in der die Kollegen bestimmte Kriterien anhaken können. Gemäß dieser Kriterien sollen dann die Dokumente gesucht und in einer Ansicht dargestellt werden.
Durch die Suche im Forum bin ich draufgekommen, dass ich die Suche in einen Agenten auslagern soll, um danach auf die Ansicht wechseln zu können.

Button in Auswertungsmaske:

--- Code: ---@Command( [ToolsRunMacro] ; "Suche" ) ;
@Command([OpenView];"Ergebnis")
--- Ende Code ---

Agent "Suche":

--- Code: --- Dim s As New NotesSession     
Dim db As NotesDatabase
Set db = s.CurrentDatabase
Dim ws As New notesuiworkspace
Dim doc As NotesDocument
        Dim uidoc as NotesUIDocument
        Set uidoc = ws.currentdocument
Set doc = uidoc.Document
Dim col As NotesDocumentCollection
Dim Selektion As String

Selektion = "FIELD Lage = "   & doc.Lage(0)
Set col = db.FTSearch (Selektion, 0)       

--- Ende Code ---

In der Zeile "Set doc = ws.currentdocument.Document " kommt der Fehler "Object variable not set", da er das uidoc nicht hat.
Wie stelle ich hier den Bezug zu den Daten in der Auswertungsmaske her?

Gruß
Bille

koehlerbv:
Von wo aus startest Du denn den Agenten?

Bernhard

Bille:
Servus Bernhard,

der Agent wird durch das Click-Ereignis in einer Schaltfläche der Maske "Auswertung" gestartet (siehe Post#1).
Der o.g. Code steht im Initialize des Agenten "Suche".
Einstellungen des Agenten:
- Auslösen durch Ereignis
- Auswahl im Menü Aktionen
- Ziel: Alle Dokumente in der Ansicht

Bille

umi:
Schon mal versucht das Ziel auf "None" zu setzen?

Bille:
Hab grad das Ziel auf "keines" umgestellt.
Ergebnis ist leider das Gleiche. Das uidoc wird nicht gesetzt.

Navigation

[0] Themen-Index

[#] Nächste Seite