Visual Basic - Compactar pero con formato de ACCESS 97

Saludos...
Estoy usando un método para compactar bases de datos, pero no encuentro la forma de que compacte en Provider=Microsoft.Jet.OLEDB.3.51, ya que por defecto compacta en Provider=Microsoft.Jet.OLEDB.4.0.
El método lo encontré en: http://guille.costasol.net/bases/ADO/indiceADO.htm
En todos los lugares donde busque explican un método parecido, pero ninguno funciona para Provider=Microsoft.Jet.OLEDB.3.51
Desde yá Muchas Gracias

Intenta este método con la base de datos cerrada:
La 1ª linea repara la base de datos.
La 2ª, la compacta.

DBEngine.RepairDatabase App.Path & "\Datos.mdb"
DBEngine.CompactDatabase App.Path & "\Datos.mdb", App.Path & "\TEMP.MDB"