[AccessD] OpenDatabase error with linked table

[David Emerson]

Further information,  Prior to this the database had the tables in the same
file.  The line read:

    Set lmdb_Exceptions = CurrentDB

Everything worked fine.  Noqw with the tables in a separate database I am
getting the error.  I am thinking perhaps a trusted location problem?

David

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Gustav Brock
Sent: Thursday, 4 January 2018 10:04 p.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] OpenDatabase error with linked table

Hi David

If I bing that, a whole page of options are listed, for example:

https://support.microsoft.com/en-us/help/319844/you-receive-a-activex-compon
ent-can-t-create-object-error-message-when

/gustav

-----Oprindelig meddelelse-----
Fra: AccessD [mailto:accessd-bounces at databaseadvisors.com] På vegne af David
Emerson
Sendt: 4. januar 2018 09:42
Til: 'Access Developers discussion and problem solving'
<accessd at databaseadvisors.com>
Emne: Re: [AccessD] OpenDatabase error with linked table

429 - "ActiveX Component can't create object.".
It stops on the line indicated below.

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Gustav Brock
Sent: Thursday, 4 January 2018 8:24 p.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] OpenDatabase error with linked table

Hi David

It should work. What is the error?

/gustav

-----Oprindelig meddelelse-----
Fra: AccessD [mailto:accessd-bounces at databaseadvisors.com] På vegne af David
Emerson
Sendt: 4. januar 2018 05:50
Til: 'Access Developers discussion and problem solving'
<accessd at databaseadvisors.com>
Emne: [AccessD] OpenDatabase error with linked table

I have the following lines in code:

    Dim lmdb_Exceptions As dao.Database

    Dim lrds_Exception_Records As dao.Recordset

    'Setup Recordset for Capacity Exception table

    Set lmdb_Exceptions =
OpenDatabase(Mid(DBEngine(0)(0).TableDefs("tblCapacityException").Connect,11
))  <-- Error here

    Set lrds_Exception_Records =
lmdb_Exceptions.OpenRecordset("tblCapacityException", dbOpenTable)

    lrds_Exception_Records.Index = "CapacityExceptionDate" 'Set Index for
dynaset

In the OpenDatabase line I get an error that "ActiveX Component can't create
object."

tblCapacityException is a linked table.
DBEngine(0)(0).TableDefs("tblCapacityException").Connect =
";DATABASE=\\PDS-SRV\ProdSched\Prod Sched Data.mdb"

I have read that I need to connect directly with the table database to use
the Index property.

This is a legacy program.  Any suggested improvements on how to achieve this
would be appreciated.

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand 

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com