Hi Folks,
ich habe einen Agenten geschrieben, der Zeitgesteuert auf dem Server laufen soll. Das Problem ist nun, dass mir das Agent-Log zwar sagt, dass der Agent gestartet wurde, aber tatsächlich passiert nichts (man müsste das sehen, da Dokumente Manipuliert werden).
Das erstaunliche ist: wenn ich den Agenten von Hand starte, läuft er einwandfrei durch.
Hat einer von euch eine Idee, woran das liegen könnte? Der Code ist wie folgt:
---
Sub Initialize
Dim queueView As NotesView
Dim outputRequestColl As NotesViewEntryCollection
Dim outputRequestEntry As NotesViewEntry
Dim outputRequest As NotesDocument
Set queueView = outputDB.GetView("($outputQueue)")
Call queueView.Refresh
Set outputRequestColl = queueView.AllEntries
Set outputRequestEntry = outputRequestColl.GetFirstEntry
While Not (outputRequestEntry Is Nothing)
Set outputRequest = outputRequestEntry.Document
Call computeOutputRequest(outputRequest)
Call outputRequest.ReplaceItemValue("$status", "-1")
Call outputRequest.Save(True, False)
Set outputRequestEntry = outputRequestColl.GetNextEntry(outputRequestEntry)
Wend
End Sub
---
Die outputDB wird per Use "ScriptLibrary" eingebunden und initialisiert.
Viele Grüße
Harry