Home > Domino Tips > Administrator > E-mail > Create Your Own "Out Of Office" Agent
Domino Tips:
EMAIL THIS
 TIPS & NEWSLETTERS TOPICS 

E-MAIL

Create Your Own "Out Of Office" Agent


Unsubscribe Remove
03.13.2000
Rating: --- (out of 5)


Digg This!    StumbleUpon Toolbar StumbleUpon    Bookmark with Delicious Del.icio.us   


The formula code can be seen below which can be copy and pasted. The agent
trigger should be set to "If New Mail Has Arrived". A person will only receive
one out of office notification during a vacation period if multiple emails are
sent.

WORKS GREAT! But, if you plan to roll agent out to several people in your
company change the trigger to "On Schedule Daily" and acting on "All new and
modified documents since last run" to minimize server load during peak hours.

Code

REM;
REM "Out of Office (OOO)";
REM "Coded by Lance Zakin - Lzakin@ivesco.com";
REM;
REM "INSTRUCTIONS";
REM "1. Modify 4 field values below before leaving for vacation and save
agent.";
REM "2. Enable agent (Select agent checkbox).";
REM;
REM "LeaveDate: First day out on vacation. i.e. @Date( year ; month ; day )";
REM "ReturnDate: First day back at work. i.e. @Date( year ; month ; day )";
REM "IntranetMsg: Message displayed to people inside company.";
REM "InternetMsg: Message displayed to people outside company from common
domain types .com, .edu, .mil, .gov";
REM;
LeaveDate := @Date(2000; 3; 10);
ReturnDate := @Date(2000; 3; 12);
IntranetMsg := "I will respond to your message when I return. If this is an
emergency I can be paged at 917-555-1212.";
InternetMsg := "I will respond to your message when I return. If this is an
emergency I can be paged from web site http://www.mobile.att.net using pin
number 5165551212.";
REM;
REM "Do not change code below.";
REM;
@If(@Today >= ReturnDate & Subject != "DISABLE OOO AGENT";
@Do(@MailSend(@UserName; ""; ""; "DISABLE OOO AGENT"; ""; ""); @Return(""));
"");
@If(DeliveredDate >= LeaveDate; ""; @Return(""));
ProfileDate := @GetProfileField("OOO"; "Date") ;
@If(ProfileDate = LeaveDate; ""; @Do(@SetProfileField("OOO"; "Date";
LeaveDate); @SetProfileField("OOO"; "AlreadyNotified"; "")));
ProfileNotified := @GetProfileField("OOO"; "AlreadyNotified") ;
@If(@IsMember(From; ProfileNotified); @Return(""); "");
@SetProfileField("OOO"; "AlreadyNotified"; From : ProfileNotified);
CR := @NewLine;
Message := @If(@Contains(@LowerCase(SMTPOriginator); ".com" : ".gov" : ".net" :
".edu" : ".mil"); InternetMsg; IntranetMsg);
Subject := @Name([CN]; @UserName) + " is out of the office.";
Remark := "I will be out of the office from " + @Text(LeaveDate ) + " until " +
@Text(ReturnDate ) + "." + CR + CR + Message;
@MailSend(From; ""; ""; Subject; Remark; "");

Rate this Tip
To rate tips, you must be a member of SearchDomino.com.
Register now to start rating these tips. Log in if you are already a member.




Digg This!    StumbleUpon Toolbar StumbleUpon    Bookmark with Delicious Del.icio.us   



RELATED CONTENT
E-mail
Secure Lotus Notes/Domino 8.x from mail to unknown recipients
Domino server setting and email policy tricks admins must know
Top 10 Lotus Notes/Domino administration tips of 2008
Can Lotus Notes/Domino and Microsoft SharePoint play nice together?
Using Formula language code to sort Lotus Notes messages by subject
LotusScript action button manages Lotus Notes mail files
Exploring Lotus Notes Domino 8.0.1 and beyond
LotusScript agent moves tagged spam email to junk mail folder
Send SMS text messages between Lotus Notes 7 and mobile devices
Update to Exchange Server 2003 Connector for Lotus Notes

RELATED RESOURCES
2020software.com, trial software downloads for accounting software, ERP software, CRM software and business software systems
Search Bitpipe.com for the latest white papers and business webcasts
Whatis.com, the online computer dictionary

DISCLAIMER: Our Tips Exchange is a forum for you to share technical advice and expertise with your peers and to learn from other enterprise IT professionals. TechTarget provides the infrastructure to facilitate this sharing of information. However, we cannot guarantee the accuracy or validity of the material submitted. You agree that your use of the Ask The Expert services and your reliance on any questions, answers, information or other materials received through this Web site is at your own risk.



Domino & Lotus Notes Security Solutions: Authentication, Antispam, Encryption and Antivirus
HomeTopicsITKnowledge ExchangeTipsAsk the ExpertsMultimediaWhite PapersDomino IT Downloads
About Us  |  Contact Us  |  For Advertisers  |  For Business Partners  |  Site Index  |  RSS
SEARCH 
TechTarget provides technology professionals with the information they need to perform their jobs - from developing strategy, to making cost-effective purchase decisions and managing their organizations' technology projects - with its network of technology-specific websites, events and online magazines.

TechTarget Corporate Web Site  |  Media Kits  |  Site Map




All Rights Reserved, Copyright 1999 - 2009, TechTarget | Read our Privacy Policy
  TechTarget - The IT Media ROI Experts