Out of Office

HCL Domino Domino Forum
1

I need to write a script that would enable the out of office configuration in my mailfile from another database by click of a button.How do I do that?

Thanks,

Sayantan.

2

Subject: Out of Office

And where is the code to specify start date, end date etc in the profile document of Out of office?

3

Subject: Out of Office

Hi, Initially you need to access the database by using

Dim db As New NotesDatabase( “Server Name”, “File Name” )

and open the db,check wether the dbis opened or not and use the below code to enable the OOO agent:

Forall agent In db.Agents

If agent.Name = agentName Then

  If agent.IsEnabled Then

    agent.IsEnabled = False

    Messagebox enabledNo,, agentName

  Else

    agent.IsEnabled = True

    Messagebox enabledYes,, agentName

  End If

  Call agent.Save

  Exit Sub

End If

End Forall

Check the agent name in your mail db.

Thanks,

Guru