次のスクリプトは、現在のエージェントが Web エージェントであるかどうかを判別します。
Dim session As New NotesSession
Dim agent As NotesAgent
Dim db As NotesDatabase
Set agent = session.CurrentAgent
If agent.IsWebAgent Then
Messagebox "This is a Web agent."
Else
Messagebox "This is not a Web agent."
End If