object invoked has disconnected from its clients

  • Thread starter Thread starter J. Clay
  • Start date Start date
J

J. Clay

I have the following code:

'***** Code Start *******
Private Sub btnAttach_Click()
Dim objApp As Outlook.Application
Dim objSelItem As Object
Dim objSelection As Selection
Dim strName As String
Dim strOrigClass As String

Set objApp = CreateObject("Outlook.Application")
Set objSelection = objApp.ActiveExplorer.Selection

'***** Code End *******


On most of our machines this is working fine, but on any of our new machines
or machines that we are assigning to new users, I am getting an error on the
second Set command "Set objSelect = ojbApp.ActiveExplorer.Selection"

The error is:

Automation error
The object invoked has disconnected from its clients.

This is happening on both SP1 and SP2 machines.

Any suggestions?

TIA,
Jim
 
Discovered the solution (Thanks Sue Mosher) in another post. Instead of
using createobject, I set my AppOjb = Application to get the running app.

Jim
 
Back
Top