ASP在線壓縮ACCESS數(shù)據(jù)庫原理很簡單:利用JRO.JetEngine的壓縮功能建立一個新的數(shù)據(jù)庫文件,然后把原來的刪掉、替換!既然這樣,壓縮程序只需幾行就ok了!
成都創(chuàng)新互聯(lián)成立于2013年,先為和政等服務(wù)建站,和政等地企業(yè),進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為和政企業(yè)網(wǎng)站制作PC+手機+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。把下面的代碼保存為**.asp,數(shù)據(jù)庫文件(db.md)放在相同目錄下,執(zhí)行asp搞定!
<% oldDB = server.mappath("db.mdb") '更改數(shù)據(jù)庫地址 newDB = server.mappath("db_new.mdb") '生成臨時文件 Set FSO = Server.CreateObject("Scripting.FileSystemObject") Set Engine = Server.CreateObject("JRO.JetEngine") prov = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Engine.CompactDatabase prov & OldDB, prov & newDB set Engine = nothing FSO.DeleteFile oldDB '刪除臨時文件 FSO.MoveFile newDB, oldDB set FSO = Nothing response.write "OK" %>