RE: Forcing LEI to throw error Eric Forte 27.Nov.12 09:37 PM a Web browser LC LSX LEI - 7.0; LC LSX - All ReleasesWindows
Daniel,
I never saw your post. I know this was a while ago, but I've attached an example below.
In rereading my original post, I should clarify. The scripted activity that calls this agent should send an email when there is an error, but it does not and therefore, we have many scripted activities (written over the course of years, preceding my arrival) that send email as below. However, sometime, we receive two emails: one from LEI and one because of the code in the error handler, so my original reason for posting is to see if there is a way that we can force the error in the error handler, such that LEI will see it as an error and send the email to the people listed on the activity document and not have to have duplicate functionality to send email in the error handler.
Thanks in advance,
Eric
======================
Sub Initialize
On Error Goto ErrorHandler
Dim s As New NotesSession
Dim curDb As NotesDatabase
Dim lcSess As LCSession
Dim view As NotesView
Dim agent As NotesAgent
Dim memo As NotesDocument, doc As NotesDocument
Dim subject As String, serverName As String, activityName As String
Set curDb = s.CurrentDatabase
REM--------------Environment Config------------------
Set lcSess = New LCSession(s.CurrentAgent.name)
activityName = lcSess.name
Return to top
. . . . RE: Forcing LEI to throw error (Eric Forte 27.Nov.12) 
Print this page
