IMPOSTAZIONE DELLE APPLICAZIONI
Per usare NotesLog, seguire l'esempio LotusScript riportato, il quale tiene traccia dei documenti elaborati da un agente rilevando il Oggetto dei documenti in questione. Le informazioni vengono registrate nel registro agente.
Dim agentLog As new NotesLog("Agent log")
Dim collection As NotesDocumentCollection
Dim db As NotesDatabase
Dim s As NotesSession
Dim count As Integer Call agentLog.OpenAgentLog Set s=New NotesSession Set db = s.CurrentDatabase Set collection = db.UnprocessedDocuments Set note = collection.GetFirstDocument count = collection.Count Do While (count >0) Subject = note.Subject Call agentLog.LogAction("Processing:"+Subject(0)) Set note = collection.GetNextDocument(note) count = count-1 Loop Call agentLog.Close
Limiti del registro agente
Il registro agente può contenere solo fino a 64 Kb di informazioni. Quando le informazioni scritte al suo interno superano tale limite, viene visualizzato il seguente messaggio e l'agente viene interrotto:
Vedere anche