這篇文章主要介紹了Asp.net如何在線備份、壓縮和修復Access數據庫,需要的朋友可以參考下

1.問題的提出

在設計中小型Web應用程序時，可以選擇Microsoft Accesss為數據庫。在數據庫的使用過程中經常性進行增加和刪除操作。事實上，Microsoft Access并不能有效地釋放已分配的但被刪除的對象空間，這將意味著即使你刪除了一個對象，而這個對象仍然占據著數據庫的空間，使得數據庫越來越大。不但占用不必要的空間，而且降低了數據庫的效率。特別在虛擬站點上的問題尤為突出。因此對Access數據庫進行壓縮瘦身很有實際意義。

雖然Access數據庫自身具有“壓縮和修復數據庫”功能（工具è數據庫實用工具è壓縮和修復數據庫）。但對一般使用者來說操作不方便。通常Accesss數據庫放置在虛擬主機上，需要把它下載下來“壓縮修復”完后再傳上去很浪費時間，所以最好能在線對數據庫進行壓縮。

2.在線壓縮數據庫的實現

2.1.添加引用

在VS.Net環(huán)境的解決方案下添加引用。方法如下：項目→添加引用→選項卡→瀏覽（c:/program files/comm files/System/ado/msjro.dll）。

2.2.創(chuàng)建Web應用程序窗體

在Web窗體(DataBase.aspx)上放置一個按鈕：

代碼如下:

<asp:Button ID="CompactBtn" runat="server" Text=" 壓縮數據庫 " OnClick="CompactBtn_Click" />

再添加一個Label控件：

<asp:Label ID="MsgLabel" runat="server"></asp:Label>

2.3.代碼狀態(tài)下，添加引用

代碼如下:

using System;

using System.IO;

using JRO;

2.4.添加代碼

代碼如下:

//壓縮數據庫

protected void CompactBtn_Click(object sender, EventArgs e)

{

string DbPath1, DbPath2, DbConn1, DbConn2;

DbPath1 = Server.MapPath("../App_Data/DataBase.mdb");//原數據庫路徑

DbPath2 = Server.MapPath("../App_Data/DataBase2.mdb");//壓縮后的數據庫路徑

DbConn1 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + DbPath1;

DbConn2 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + DbPath2;

try

{

JetEngine DatabaseEngin = new JetEngine();

DatabaseEngin.CompactDatabase(DbConn1, DbConn2);//壓縮

File.Copy(DbPath2, DbPath1, true);//將壓縮后的數據庫覆蓋原數據庫

File.Delete(DbPath2);//刪除壓縮后的數據庫

MsgLabel.Text = "數據庫壓縮成功!";

}

catch

{

MsgLabel.Text = "數據庫壓縮失敗，請重試!";

}

}

3.備份數據庫

3.1.創(chuàng)建Web應用程序窗體

在Web窗體(DataBase2.aspx)上放置一個按鈕：

代碼如下:

<asp:Button ID="BackUpBtn" runat="server" Text=" 備份數據庫 " OnClick="BackUpBtn_Click" />

再添加一個Label控件：

<asp:Label ID="MsgLabel" runat="server"></asp:Label>

3.2.代碼狀態(tài)下，添加引用

代碼如下:

using System;

using System.IO;

3.3.添加代碼

代碼如下:

//備份數據庫

protected void BackUpBtn_Click(object sender, EventArgs e)

{

string DbPath1, DbPath2, DbName4DbPath2;

DbName4DbPath2 = DateTime.Now.ToString().Replace(":",".");

DbPath1 = Server.MapPath("../App_Data/DataBase.mdb");

DbPath2 = Server.MapPath("../App_Data/" + DbName4DbPath2 + ".mdb");

try

{

File.Copy(DbPath1, DbPath2, true);

MsgLabel.Text = "數據庫備份成功到" + DbName4DbPath2 + ".mdb!";

}

catch

{

MsgLabel.Text = "數據庫備份失敗，請重試!";

MsgLabel.CssClass = "redColor";

}

}

4.總結

經過壓縮使Microsoft Access真正釋放占據的多余空間，數據庫盡量減小，保證它最有效地運行。因此，在設計的過程中，不可忽視對Microsoft Access進行壓縮的重要性。

建議壓縮前先對數據庫進行備份。

更多信息請查看IT技術專欄