OOO On Terminated Employees

HCL Domino Domino Forum
1

We would like to run OOO for a terminated employee, but find that the user can’t be in the “Deny Access Group” and run an agent at the same time.

Anyone have a work-around?

TIA!

2

Subject: OOO On Terminated Employees

Hi Brian,You can use the following agent I use it quite often for the same purpose :

Sub Initialize

Dim session As New NotesSession

Dim db As NotesDatabase

Dim collection As NotesDocumentCollection

Dim memo As NotesDocument

Dim reply As NotesDocument

Dim rtitem As NotesRichTextItem	

Set db = session.CurrentDatabase



Set collection = db.UnprocessedDocuments

Set memo = collection.GetFirstDocument()





While Not(memo Is Nothing)

	If Not( memo.SentByAgent ) Then

		

		Set reply = memo.CreateReplyMessage( False )

		reply.form = "Autoreply"

		Dim rti As New NotesRichTextItem(reply, "Body")			

		reply.Principal = ("Email adddress from whom the OOO should be sent")

		

		

		reply.Subject = "Re: " & memo.Subject( 0 )

		Call rti.AppendText("The OOO message")

		Call rti.AddNewLine(2)

		Call rti.AppendText("This is an auto reply mail. Do not reply to this mail.")

		

		

		

		

		Call reply.Send( True )

	End If

	Call session.UpdateProcessedDoc( memo )

	Set memo = collection.GetNextDocument(memo)

Wend

End Sub

3

Subject: OOO On Terminated Employees

Have you tried signing the agent with another user? Maybe changing the owner of the DB? (Preferences)

A good thing could be to modify the forwarding address of all terminated users to a general account (Active of course) with a OOO enabled and just answering that the user no longer works there.

4

Subject: RE: OOO On Terminated Employees

Thanks Sebastian; will give those a try.

5

Subject: RE: OOO On Terminated Employees

forget the juju … you don’t need any of that … juut use a “simple” agent