Compattazione database ACCESS 2007 tramite vbscript

[vic53]

Per che sta cercando di compattare il database Access 2007 via ASP,
Inserisco la routine che ho sperimentato e che condivido

...
archivi = Server.MapPath("database\archivi.accdb")
compdb = Server.MapPath("database\archiviCP.accdb")

set objDAO = server.CreateObject("DAO.DBEngine.120")
objDAO.CompactDatabase archivi , compdb
if err <> 0 then
        Response.Write "db archivi Errore: " & err.description
        swErr=swErr+1
else
        msg="database: "&archivi&" compattato!;"
        'Response.Write "Il Database " & archivi & " è stato compattato con successo"
end if
...

Naturalmente le librerie DAO devono essere installate.... microsoft DAC...

un saluto

[Vincent.Zeno]

Per che

immagino intendessi "per chi"

[vic53]

a si ... scusami ero distratto...
avevo visto che c'era chi cercava questa compattazione ma non ricordo dove lo avevo visto allora l'ho messa per chi sta usando aCCESS 2007 o successivo per compattarlo...
ciao