Compactar una base de datos acces con visual basic .net

Module Module1



Sub Main()



Dim jro As JRO.JetEngine



jro = New JRO.JetEngine()



jro.CompactDatabase("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:wind.mdb", _

"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\NewNwind.mdb;Jet
OLEDB:Engine Type=5")



MsgBox("Finished Compacting Database!")

End Sub



End Module


Espero que te sirva. Salu2.

"Gabriel" escribió en el mensaje
news:

Como se puede compactar una base de datos de acces con visual basic .net ?