Can somebody explain where I may be making a mistake. I'm trying to compact an access database using the JetEngine object. Here is my code:
Dim myJet As JRO.JetEngine
Set myJet = New JRO.JetEngine
myJet.CompactDatabase gstrConnection, gstrCompact
Set myJet = Nothing
I'm getting this error:
Run time error -2147217887 (80040e21)
Multi-step OLE DB operation generated errors. Check each OLE DB status value, if available. No work was done.
