komprimera?!, vilka krav!.
du får nog använda en komponent som kan exekvera DOS kommandon och köra en komprimeringsprogram när filen blir för stor. Läs genom filesystemboject, där finns alla kommandon du har nytta av.
Att göra en kopia och ändra namn mm. går utmärkt med filesystemobjects, om rättigheterna är rätt satta.
Däremot att komprimera databasen tror jag inte går, för du menar väl Accessverktyget komprimera (som tar bort raderade poster) eller menar du något packningsformat?
finns inget Access verktyg, det är en serverkomponent du måste få installerat på servern scriptet ska köras. DAO 3.5 must be installed.. den är ju ganska självförklarande.
Set Engine = CreateObject("DAO.DBEngine.35")
Engine.CompactDatabase "path\feting_databas.mdb", "path\krympt_databas.mdb"
Testa att ge den nya databasen samma namn som den gamla (alltså lägg dem i samma mapp då också) så kanske det går?
Värt ett försök. Men kanske inte på din värdefulla feting databas med massa med viktig info. ;)
Edit:
Kollade på sidan nu. Varför använda sig av DAO när man kan använda sig av OLE DB och JET (som ju är mycket nyare och mer profilerat för internet)?? JET 4.0 finns med till win2000 ver jag iallfall. Tror det ska finnas till NT 4 också. Eller snarare sagt, jag vet (nästan) att det ska göra det.