Access 2002 - AccessConnection failure

[Richard Boaz]

hi,

i have the following problem:

- the following VB code snippet (attached to a button on a form in access
2002) is failing on the last line (Set cn =...):

=======begin code snippet=============

Private Sub Make_Invoice_Click()
On Error GoTo Err_Make_Invoice_Click

'Use the ADO connection that Access uses
Dim cn As ADODB.Connection

Set cn = Application.CurrentProject.AccessConnection

=======end code snippet===============

- with the following error message:

Run-time error '-2147467259 (80004005)':
Method 'AccessConnection' of object '_CurrentProject' failed

various investigations produce:

- within VB, when stepping through and putting a watch on CurrentProject,
the following values exist:
: AccessConnection : <Application-defined or object-defined error
: BaseConnectionString : "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA
SOURCE=F:\business\clients\clients.mdb;PERSIST SECURITY INFO=FALSE;Jet
OLEDB:System database=C:\Documents and Settings\Richard Boa"

- the last part of the connection string appears to be cut off, don't know
why... (could this be the problem?)

- my machine's state:
.. installed Office XP SP3
.. installed Jet SP8
.. upgraded from XP home to XP professional (upgrade, not a new install)

- prior observations:
.. this has previously worked (before upgrade and SP installations)
.. the above code is, in fact, provided by microsoft directly

- anyone have any ideas where my machine is mis-configured causing this
failure?
- might it be somehow related to XP home vs. XP Professional (i.e.,
networking difference?)
- are there any security issues that are relevant?; e.g., have i installed
an MS security patch that now prevents me from accessing my own database?

any insight/pointers/outright help is very appreciated.

richard boaz

 

[Van T. Dinh]

Not sure about "AccessConnection". I normally use:

Set cn = Application.CurrentProject.Connection

which works fine for me.