[AccessD] Code to detect if Outlook is open

And if you do not want to be tied to a given version of Outlook, you can use
late binding like so:

Dim objOutlook As object	'note as object now, not outlook.application

On Error GoTo Err_NoOutlook
Set objOutlook = GetObject(, "Outlook.Application")

This is air code, so ymmv.

Bobby

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey
Sent: Monday, March 07, 2005 8:53 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Code to detect if Outlook is open


Hi Doris
I can't test it in A2003 but this works in earlier versions

Dim objOutlook As Outlook.Application

On Error GoTo Err_NoOutlook
Set objOutlook = GetObject(, "Outlook.Application")


If it errors then Outlook's not running.

Any use?

--
Andy Lacey
http://www.minstersystems.co.uk



--------- Original Message --------
From: Access Developers discussion and problem solving
<accessd at databaseadvisors.com>
To: 'Access Developers discussion and problem solving'
<accessd at databaseadvisors.com>
Subject: [AccessD] Code to detect if Outlook is open
Date: 07/03/05 14:33

>
> Does anyone have any code to detect if Outlook is open that works in 
> Access2003?
>
> Doris Manning
> Database Administrator
> Hargrove Inc.
> www.hargroveinc.com