I have some code I use to handle mail messages (Outlook 2003) with VB/VBA as
follows:

Dim objOutlook As Outlook.Application
Set objOutlook = CreateObject("Outlook.Application")
etc....

The code works fine except when the Exchange Server is unavailable (Popup
message Your Microsoft Exchange Server is unavailable / Retry - Work Offline
- Cancel)

Is it possible, programmatically (VB or VBA), to check the availability of
the Exchange Server before using Outlook features ?

Thanks a lot. Regards.

Jean-Luc