LOTUSSCRIPT/COM/OLE CLASSES
Examples: NotesAgent class
1. This script finds the Cleansing Agent in the current database and assigns it to the agent object. It uses the Agents property defined in NotesDatabase.
Dim session As New NotesSession
Dim db As NotesDatabase
Dim agent As NotesAgent
Set db = session.CurrentDatabase
Forall a In db.Agents
If ( a.Name = "Cleansing Agent" ) Then
Set agent = a
Exit Forall
End If
End Forall
2. This agent script gets the current agent, puts it into the agent object, and then gets its name. For example, if this script runs as part of the Ticket agent, the Name property returns "Ticket."
Dim session As New NotesSession
Dim agent As NotesAgent
Dim n As String
Set agent = session.CurrentAgent
n = agent.Name
Siehe auch
NotesAgent class
Glossar
Ihre Kommentare zur
Hilfe
oder zur
Verwendbarkeit der Software
?
Hilfe zur Hilfe
Inhalt der gesamten Hilfe
Glossar