Compact database problem

[TheVampire]

I compacted a MDB database using the Jet Engine with the following statements.

Dim JRO As New JetEngine
Dim DB_Source As String
Dim DB_Target As String

DB_Source = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=(Source path)"

DB_Target = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=(Target Path)"

JRO.CompactDatabase DB_Source, DB_Target

After which I killed the original and copied the compacted target back to the original file name.

The problem is, that I can still read the database in the rest of my VB program just fine, but when I try to open it in the Visual Data Manager add-in in VB, it says it's an unrecognized format and won't open it. I stupidly copied over my backup before I noticed this problem....

How can I get the Database back to where the data manager can open and ( most importantly ) modify it?

Robert

 

[TheVampire]

OK, It seems I need to fix visdata by adding a few lines to it. I found the FAQ on this in the databases forum of Tek-Tips.

Robert