Guten Morgen Ihr Wissenden,
ich versuche einen Agenten nach dem Datenbank öffnen laufen zu lassen.
Beim Debuggen hab ich festgestellt, daß er die "uiview" nicht vom Workspace erstellen kann. Wenn ich aber jetzt vor den Agentenaufruf ein "@Prompt" setze funktioniert die Sache.
Kann mir jemand von euch erklären warum das so ist???
----
Es scheint ein Zeitproblem zu sein,
wenn ich den Code Schritt für Schritt debugge funktioniert es.
Wahrscheinlich wird der ws zu früh initialisiert, wenn das frontend noch nicht aufgebaut ist.
--
lg claudia
Post Open (funktioniert ..):[/:
@Prompt([Ok]; "Zeit.."; @Text(@Now; "T1S1"));
@Command([RunAgent] ; "AG" );
@All
Post Open (funktioniert nicht ..):
@Command([RunAgent] ; "AG" );
@All
AG:
@SetTargetFrame("r_Inhalt");
@Command( [ViewCollapseAll] ) ;
@SetTargetFrame("r_Inhalt");
@Command([RunAgent] ; "SelectDoc1" );
@Command( [ViewExpand] );
@All
SelectDoc1:
Sub Initialize
Dim ws As New NotesUIWorkspace
Dim uiview As NotesUIView
Set uiview = ws.CurrentView
Dim view As NotesView
Dim doc As NotesDocument
Dim var, var2 As Variant
Dim session As New NotesSession
Set db = session.CurrentDatabase
Dim agent As NotesAgent
Set view = db.GetView("Category")
Set doc = db.GetDocumentByUNID( "88D1ED8A2001CA04C1257192002ADA2C" )
Call uiview.SelectDocument( doc )
End Sub[/size]
