Access 2016 - Method AccessConnection failure

[andrea76]

Hy everybody,

I’m having problems with making an access file work in a PC with the following features: access 2016 and windows 10.

The problem is within the method ‘AccessConnection’ of the object ‘Application.CurrentProject’.

When I try to get connection with Db using the following:

 Dim CN as ADODB.Connection
           Set CN = New ADODB.Connection
           Set CN = Application.CurrentProject.AccessConnection

,

it results in the following error string:

“runtime error ‘-2147467259 (80004005)’:
Method ‘AccessConnection’ of object ‘_CurrentProject’ failed”.



Moreover, the same .accdb file in an other machine with windows 10 and access 2016 works correctly.

May anyone help me?
Andrea

[ranman256]

Why do you need it?
None of this is needed to get data from an access db .

[andrea76]

I use ADO object in the file to interact with db trhoug VBA (querying data, execute command, etc...)