Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Dim Text1, Text2, Text3, TextComma As String TextComma = ", " Text1 = "Thanks for your e-mail! " Text2 = "My hours are 7:30 - 4:00 and I am gone for the rest of today, " Text3 = ". I will return your e-mail in the morning. " Set oSession = CreateObject("MAPI.Session") oSession.Logon "", "", False, False 'Set the body text. oSession.OutOfOfficeText = Text1 & Chr$(13) & Chr$(13) & Text2 & WeekdayName(Weekday(Date)) & TextComma & Date & Text3 'Turning on Out of Office oSession.OutOfOffice = True
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.