Converting access 2000 to a prior version through VBA

[talenx]

Hello,
Does anybody know how to convert an access 2000 database to a prior version and access (example access 97). through VBA
access provides a method but it doesn't seem to work correctly.

it goes something like this
'------------------------------------------------------
'this will compact the your current database.

DBEngine.CompactDatabase"olddbname.mdb","newdbname.mdb",,,vbversion30
'-----------------------------------------------------
'then you will have to delete the olddatabase

If Dir (&quot;database path\olddbname.mdb&quot<>&quot;&quot; then
Kill &quot;database path\olddbname.mdb&quot;
'----------------------------------------------
'Rename the new database back to the old database name.
Name &quot;database path\dbname.mdb&quot; As &quot;database path\dbname.mdb&quot;

my problem is that MS gives the option to use a dbverison30
in place of the [option] var bit it does NOT convert the database

DBEngine.CompactDatabase olddb, newdb, locale, options, password