Hej!

Använder ADODB. Är det någon som vet hur man gör "repair" resp. "compact" på en Access databas. Dvs motsvarande de kommandon som finns i Visdata.exe

http://www.pellesoft.nu/login/articles/databas/compact_remote.asp

Det exemplet kräver att Access är installerat på datorn, om du inte har det kan du göra såhär:

Sätt en referens till Microsoft Jet and Replications Objects

Dim jroJet As JRO.JetEngine
Set jroJet = New JRO.JetEngine
jroJet.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\gammal.mdb", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ny.mdb"

/Johan