溫馨提示×

溫馨提示×

您好，登錄后才能下訂單哦！

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務(wù)條款》
  • 首頁 > 
  • 教程 > 
  • 數(shù)據(jù)庫 > 
  • ACCESS數(shù)據(jù)庫的壓縮、備份、還原、下載以及刪除數(shù)據(jù)的實現(xiàn)方法

ACCESS數(shù)據(jù)庫的壓縮、備份、還原、下載以及刪除數(shù)據(jù)的實現(xiàn)方法

發(fā)布時間：2021-09-14 03:40:07 來源：億速云 閱讀：172 作者：chen 欄目：數(shù)據(jù)庫

本篇內(nèi)容介紹了“ACCESS數(shù)據(jù)庫的壓縮、備份、還原、下載以及刪除數(shù)據(jù)的實現(xiàn)方法”的有關(guān)知識，在實際案例的操作過程中，不少人都會遇到這樣的困境，接下來就讓小編帶領(lǐng)大家學(xué)習(xí)一下如何處理這些情況吧！希望大家仔細閱讀，能夠?qū)W有所成！

復(fù)制代碼 代碼如下: 

<html> <head> <metahttp-equiv="Content-Language"content="zh-cn"> <metahttp-equiv="Content-Type"content="text/html;charset=gb2312"> <title>數(shù)據(jù)庫管理</title> </head> <body> <divalign=center>數(shù)據(jù)庫管理系統(tǒng)</div> <br> <br> <palign="center"> <% DimZC_DATABASE_PATH '數(shù)據(jù)庫的路徑 ZC_DATABASE_PATH="database/data.mdb" data_array=Split(ZC_DATABASE_PATH,"/") Dimaction action=trim(request("action")) Dimdbpath,bkfolder,bkdbname,fso,fso1 SelectCaseaction Case"" Callchushihua() Case"CompressData"'壓縮數(shù)據(jù) Dimtmprs dimallarticle dimMaxid dimtopic,username,dateandtime,body callCompressData() case"BackupData"'備份數(shù)據(jù) ifrequest("act")="Backup"Then callupdata() else callBackupData() endIf case"RestoreData"'恢復(fù)數(shù)據(jù) dimbackpath ifrequest("act")="Restore"Then Dbpath=request.form("Dbpath") backpath=request.form("backpath") ifdbpath=""Then response.write"PleaseinputyourdatabasewholeName" else Dbpath=server.mappath(Dbpath) endIf backpath=server.mappath(backpath) SetFso=server.CreateObject("scripting.filesystemobject") iffso.fileexists(dbpath)Then fso.copyfileDbpath,Backpath response.write"數(shù)據(jù)庫被成功還原!<br>" else response.write"沒找到您所需要的數(shù)據(jù)庫!" endIf else callRestoreData() endIf Case"SpaceSize"'系統(tǒng)空間占用 callSpaceSize() Case"deletebackup" Dimdbname dbpath=Request.QueryString("dbpath") dbname=Request.QueryString("dbname") dbpath=Server.MapPath(dbpath) dbpath=dbpath&"\"&dbname setfso=CreateObject("Scripting.FileSystemObject") Iffso.FileExists(dbPath)Then fso.DeleteFile(DBPath) Setfso=nothing response.write"<br>您備份的數(shù)據(jù)庫已經(jīng)"&dbpath&"被成功刪除!<br><br><ahref=""data_s.asp"">返回..</a>" Else response.writedbpath response.write"<br>輸入的路徑錯誤,請確認后重新輸入!<br><br><ahref=""data_s.asp"">返回..</a>" EndIf CaseElse EndSelect %> </div> <% response.write"</body></html>" Subchushihua() %> <divalign=center> <formid="edit"> <br/> <ahref="?action=CompressData">[壓縮數(shù)據(jù)庫]</a> <br/><br/><ahref="?action=BackupData">[備份數(shù)據(jù)庫]</a> <br/><br/><ahref="?action=RestoreData">[還原數(shù)據(jù)庫]</a> <br/><br/><ahref="?action=SpaceSize">[系統(tǒng)空間占用]</a> <br/><br/> </form> </div> <%endsub%> <% '====================系統(tǒng)空間占用======================= SubSpaceSize() OnErrorResumeNext %> <divalign=center> <divalign=center> 系統(tǒng)空間查看 <br/><br/> <formid="edit"> <br> 數(shù)據(jù)庫:<%showSpaceinfo("../"&data_array(1)&"")%><br><br> 備份數(shù)據(jù)庫:<%showSpaceinfo("databackup")%><br><br> 系統(tǒng)總共:<%showSpaceinfo("/")%> <br><br> </form> </div> <br> <br> <br> <ahref="data_s.asp">返回...</a> </div> <% EndSub %> <%SubShowSpaceInfo(drvpath) dimfso,d,size,showsize setfso=server.CreateObject("scripting.filesystemobject") drvpath=server.mappath(drvpath) setd=fso.getfolder(drvpath) size=d.size showsize=size&"Byte" ifsize>1024Then size=(Size/1024) showsize=size&"KB" endIf ifsize>1024Then size=(size/1024) showsize=formatnumber(size,2)&"MB" endIf ifsize>1024Then size=(size/1024) showsize=formatnumber(size,2)&"GB" endIf response.write"<fontface=verdana>"&showsize&"</font>" EndSub %> <% SubRestoreData() %> <divalign=center> <divalign=center> <br/><...

“ACCESS數(shù)據(jù)庫的壓縮、備份、還原、下載以及刪除數(shù)據(jù)的實現(xiàn)方法”的內(nèi)容就介紹到這里了，感謝大家的閱讀。如果想了解更多行業(yè)相關(guān)的知識可以關(guān)注億速云網(wǎng)站，小編將為大家輸出更多高質(zhì)量的實用文章！

向AI問一下細節(jié)

免責(zé)聲明：本站發(fā)布的內(nèi)容（圖片、視頻和文字）以原創(chuàng)、轉(zhuǎn)載和分享為主，文章觀點不代表本網(wǎng)站立場，如果涉及侵權(quán)請聯(lián)系站長郵箱：is@yisu.com進行舉報，并提供相關(guān)證據(jù)，一經(jīng)查實，將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI
助
手