Compact Access Database With ADO 1

[jtrapat1]

Can anyone help?

I'm trying to compact an Access database from a VB6 Program and it's not working.

I'm using info found here:

http://www.able-consulting.com/adox_faq.htm#Q7

I've tried hard-coding my database path but the Compact utility
doesn't seem to be working in Access.

Here's my code:

Dim oJetEngine As JRO.JetEngine

Dim sSourceConn As String
Dim sDestConn As String
Dim lngErr As Long

Set oJetEngine = New JRO.JetEngine

On Error GoTo CompactIt_Error

oJetEngine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\\CRCCore.mdb", _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\\CRCCore2.mdb;Jet OLEDB:Engine Type=4"

I try to break up the source and connection strings but that doesn't work either.
I've got a Reference to the JRO object included but I can't think of anything else.

Thanks in advance.

 

[dpaulson]

if your database is in the root directory then you use only 1 backslash, otherwise fill in the full path.

Data Source=c:\CRCCore.mdb
David Paulson

 

[Guest_imported]

On compact Access 97 database using JRO Jet engine the format has been changed. so can't able to open using Access 97. How to solve this problem?

 

[Guest_imported]

On compacting Access 97 database using JRO Jet engine the format has been changed. so can't able to open using Access 97. How to solve this problem?