Automatically Enabling "Out of Office Assistant"

  • Thread starter Thread starter Larry Johnson
  • Start date Start date
L

Larry Johnson

Is there a way to enable the Out of Office Assistant whenever the user exits
from Outlook? I want to use VBA in the QUIT event, but I can't find a
proper object for the Assistant.

Larry
 
Larry Johnson said:
Is there a way to enable the Out of Office Assistant whenever the user exits
from Outlook? I want to use VBA in the QUIT event, but I can't find a
proper object for the Assistant.

Larry
Click to expand...


You should be able to get this to work:

I have a reference set to cdo 1.21.
Dim oSession As MAPI.Session
Set oSession = CreateObject("mapi.session")
oSession.Logon , , True, False
oSession.OutOfOffice = True
oSession.Logoff
Set oSession = Nothing

There is one problem that I can't get around though. If the user has
mail delivered to a pst, they can have a pst open, but if outlook is
set to deliver mail to the pst I can't get it to work yet.

Hope this helps.
Rich
 
Back
Top