Examples: Target property
- This script indicates whether or not the current agent works on
all documents in the database.
Dim session As New NotesSession
Dim agent As NotesAgent
Set agent = session.CurrentAgent
If agent.Target = TARGET_ALL_DOCS Then
Messagebox "This agent works on all docs."
Else
Messagebox "This agent does not work on all docs."
End If
- This script determines the target of the current agent and displays
the result.
Dim session As New NotesSession
Dim agent As NotesAgent
Dim db As NotesDatabase
Set agent = session.CurrentAgent
targetDoc = agent.Target
Select Case targetDoc
Case TARGET_ALL_DOCS : targetDoc = "all documents."
Case TARGET_NEW_DOCS : targetDoc = "new documents."
Case TARGET_NEW_OR_MODIFIED_DOCS : targetDoc = _
"new or modified documents."
Case TARGET_SELECTED_DOCS : targetDoc = "selected documents."
Case TARGET_ALL_DOCS_IN_VIEW : targetDoc = _
"all documents in view."
Case TARGET_UNREAD_DOCS_IN_VIEW : targetDoc = _
"unread documents in view."
Case TARGET_NONE : targetDoc = "none."
End Select
Messagebox "The target of this agent is " & targetDoc
Have feedback?
Google Analytics is used to store comments and ratings. To provide a comment or rating for a topic, click Accept All Cookies or Allow All in Cookie Preferences in the footer of this page.