Ich glaubs nicht... Ich verfasse hier die Antwort des Jahrhunderts und beim Posten schmiert der gammlige IE ab...
OK dann eben nochmal... Und diesmal leider weniger Detailiert und vorher lieber Strg+a, Strg+c...
Guten Morgen erstmal,
also der Agent ist "auf alle markierten Dokumente" gesetzt und wird über eine Aktionsschaltfläche gezündet.
In der Aktion wird der Agent per "@Command([ToolsRunMacro];" gestartet, welcher ansich in LotusScript verfasst ist. Somit müsste der Agent doch auf alle tatsächlich (durch Häkchen) markierten Dokumente wirken oder?
In einer Aktion werden doch sicherlich erstmal alle Agenten auf jedes Markierte Dokument angewandt und nicht erst Agent 1 auf alle, dann Agent 2 auf alle usw?
Ich vermute dass der Fehler mal wieder in der Programmierung liegt, denn ich schaffe es mit wenig Gefummel, dass das zu ändernde Icon in allen Dokumenten der DB bearbeitet wird, obwohl nur eins markiert ist...
Folgend mal der code:
Dim session As New NotesSession
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set dc = db.UnprocessedDocuments
Set doc = dc.GetFirstDocument
If Not (doc Is Nothing) Then
Call doc.ReplaceItemValue("$ContentIcon", "Logo.gif")
Call doc.Save(True,True,True)
End If
Man wär das schön, wenn man Routine essen könnte...
So jetzt versuch ichs nochmal mit dem Posten, aber vorher wie erwähnt Strg+A, Strg+C.
Bis dann mal,
-Moritz