VB.NET中Caching的使用方法

更新時間：2013年04月28日 16:21:58 作者：

Caching緩存，就是將一些生成代價比較大的常用數(shù)據(jù)，保存起來重用。一般數(shù)據(jù)都保存在內存中，因為從內存中讀取數(shù)據(jù)比從數(shù)據(jù)庫等其他地方要快。

ASP.NET通過兩種方式支持緩存：通過Cache API存儲任意數(shù)據(jù)，通過頁面輸出緩存經常被訪問的頁面。讓我們來看一個例子。

一個電子商務的站點，它的目錄一般一周更新一次。站點提供了一套用戶界面讓客戶訂購產品。當一個客戶瀏覽目錄時，系統(tǒng)將通過網(wǎng)絡去查詢數(shù)據(jù)庫，進行各種計算，最后返回結果。

從服務器查詢這些目錄數(shù)據(jù)的操作是很頻繁的。我們知道，這些數(shù)據(jù)一周才變化一次。所以以下的幾種操作將帶來性能上的損失。

1. 執(zhí)行ASP.NET的程序生成對數(shù)據(jù)庫的查詢語句。
2. 通過網(wǎng)絡，和數(shù)據(jù)庫服務器進行通訊。
3. 數(shù)據(jù)庫服務器編譯執(zhí)行查詢（或是執(zhí)行儲存過程）。

緩存機制可以減少許多這樣的工作，提高應用的性能和伸縮性。我們能緩存結果以便能靜態(tài)的處理客戶請求，來提高性能。同時，由于減少了處理每個請求使用的資源，因此也提高了系統(tǒng)的伸縮性。

Cache API對于ASP開發(fā)人員來說，把常用的數(shù)據(jù)保存在內存里，并不是一個全新的概念。在ASP里，有兩個對象完成它。

Session 對象

Application 對象

Session用來保存單個用戶在多個請求間共享的數(shù)據(jù)，雖然在ASP.NET中有一些小的改動，但這些改動主要是在應用級的，對Session對象來說，仍然是一個保存鍵與鍵值對的集合。Application對象在ASP.NET也被保存下來了，同樣是鍵與鍵值對的集合。在ASP和ASP.NET中，我們都可以使用以下代碼來操作Application 對象

復制代碼代碼如下:

Application("SomeInterestingData") = "Example data"
Response.Write(Application("SomeInterestingData")

我們可以使用同樣的方法訪問Session對象。

ASP.NET帶來了一個新的鍵與鍵值的對象—Cache.除了存儲鍵與鍵值對外，Cache對象還提供了另外的一些存儲短期數(shù)據(jù)的新功能：依賴—當一個鍵插入Cache對象時，我們可以設置它的依賴性。當依賴的對象改變時，這個鍵將被刪除?，F(xiàn)在支持的依賴對象有文件，其他的鍵和時間。自動失效—沒有依賴的鍵值，當使用頻率不高時，將被自動刪除。支持回調—當一個鍵將被刪除時，我們可以得到一個事件，在這個事件中來更新鍵值或取消刪除操作。
當我們在使用Cache對象時，必須注意這一點：使用Cache對象中的鍵值之前,必須每一次都檢查鍵值是否存在。由于在Cache對象中的鍵值由于其依賴或者使用頻率較低，都會被刪除，所以，每一次使用Cache中的對象，都必須檢查是否存在。例如，我們可以用如下一段代碼來返回DataSet.

復制代碼代碼如下:

Private Function LoadDataSet() As DataSet
Dim sqlConnection As SQLConnection
Dim sqlAdapater As SQLDataSetCommand
Dim datasetProducts As New DataSet()
Dim sqlDSN As String
Dim sqlSelect As String
" Connection String and Select statement
sqlDSN = "server=localhost;uid=sa;pwd=;database=grocertogo"
sqlSelect = "Select * From Products"
" Connect
sqlConnection = new SQLConnection(sqlDSN)
sqlAdapater = new SQLDataSetCommand(sqlSelect, sqlConnection)
" Fill dataset create product table
sqlAdapter1.FillDataSet(datasetProducts, "products")
Return products
End Function
我們很容易用Cache對象來改寫這段代碼，使只在DataSet不存在在Cache中才調用LoadDataSet()。 
Public Function GetProductData() As DataSet
If (IsNothing(Cache("ProductData")) Then
Cache("ProductData") = LoadDataSet()
Return Cache("ProductData")
End Function