總的來說，提高應(yīng)用程序性能的的方法是發(fā)現(xiàn)應(yīng)用的瓶徑之所在，和數(shù)據(jù)庫進(jìn)行交互的性能無疑是決定應(yīng)用程序性能的重要環(huán)節(jié)之一。
因為ADO是當(dāng)前最新的基于組件的數(shù)據(jù)庫編程的接口，這里我們主要討論用ADO編程所需要注意的問題，因為ADO是一個和編程語言無關(guān)的COM組件系統(tǒng)，所以這里討論的要點適用于所有的編程語言和編程環(huán)境，比如：VB、VBScript、VC、Java等等。
顯式的定義對象變量的類型：
實際上，這條準(zhǔn)則不僅適用于ADO編程，也適用于其他的COM對象相關(guān)的編程，因為如果一開始就定義變量類型的話，編譯器在編譯的時候就可以知道變量的類型，編譯器實際上就采用vtable偏移的方式來得到具體的COM對象包含的方法的地址（這一點和C++中的虛函數(shù)的地址的獲取類似），但如果一開始不指定變量類型的話，比如簡單的采用如下的語句：
DIM myCon as Object
或者是
DIM myCon
那么編譯器在編譯的時候就不能得到變量的類型，而只能在運行的時候動態(tài)的得到方法的信息（通過使用接口IDispatch的方法Invoke來實現(xiàn)的），這樣為了得到方法的地址和相關(guān)的變量情況就需要在內(nèi)部進(jìn)行兩次調(diào)用，無疑就使速度降低。
當(dāng)瀏覽記錄的時候，綁定列到具體的字段對象上去
這個意思就是說在一開始的時候我們就建立對字段對象的引用，避免在每次得到記錄的時候需要在Rcordset::Fields中進(jìn)行查找而增加系統(tǒng)的開銷。
比如可以采用如下的示例代碼形式：
Private Sub TblBrowse_Click()
Dim fld1 As ADODB.Field
Dim fld2 As ADODB.Field
Dim rs As ADODB.Recordset
set rs=g_cn.execute(...) 'g_cn為全局adodb.connection對象
Set fld1 = rs.Fields("id") '數(shù)據(jù)表的字段
Set fld2 = rs.Fields("name") '數(shù)據(jù)表的字段
If rs.BOF = False Then
While rs.BOF = False
Debug.Print fld1.Value
Debug.Print fld2.Value
rs.MoveNext
Wend
End If
rs.Close
End Sub
盡量采用SQL語句和存儲過程進(jìn)行數(shù)據(jù)更新
盡管采用Recordset對象來更新數(shù)據(jù)是非常方便的，但是它的開銷也更大，所以如果可能的話，就要采用SQL語句來更新數(shù)據(jù)。使用存儲過程而不是單一的SQL語句來獲取信息。因為存儲過程是在服務(wù)器端執(zhí)行的，只把結(jié)果返回到客戶端，這樣一方面可以降低網(wǎng)絡(luò)進(jìn)行數(shù)據(jù)交互的開銷，另一方面使系統(tǒng)更加容易維護(hù)，并且保持?jǐn)?shù)據(jù)的一致性。而如果使用recordset來得到結(jié)果的話，通過數(shù)據(jù)源對象返回的查詢集不僅包含了數(shù)據(jù)，而且也包含了元數(shù)據(jù)（metadata）,在有些時候元數(shù)據(jù)可能比數(shù)據(jù)本身還要大，這樣系統(tǒng)的開銷無疑也增加了不少。
如果必須要使用游標(biāo)的話，使用集合的方法對單條的SELECT語句進(jìn)行操作
Recordset::get_Collect和Recordset::put_Collect方法是Recordset 對象的快捷方式，可以使你快速的得到一個字段的值而不需要獲得關(guān)于一個字段的引用。可以參考如下的示例代碼：
Sub Collect()
Dim rs As New Recordset
rs.ActiveConnection = "…"
rs.Source = "一條SQL查詢語句"
rs.Open
Debug.Print rs.Collect(0), rs.Collect(1), rs.Collect(2)
Debug.Print rs!au_id, rs!au_fname, rs!au_lname
因為ADO是當(dāng)前最新的基于組件的數(shù)據(jù)庫編程的接口，這里我們主要討論用ADO編程所需要注意的問題，因為ADO是一個和編程語言無關(guān)的COM組件系統(tǒng)，所以這里討論的要點適用于所有的編程語言和編程環(huán)境，比如：VB、VBScript、VC、Java等等。
顯式的定義對象變量的類型：
實際上，這條準(zhǔn)則不僅適用于ADO編程，也適用于其他的COM對象相關(guān)的編程，因為如果一開始就定義變量類型的話，編譯器在編譯的時候就可以知道變量的類型，編譯器實際上就采用vtable偏移的方式來得到具體的COM對象包含的方法的地址（這一點和C++中的虛函數(shù)的地址的獲取類似），但如果一開始不指定變量類型的話，比如簡單的采用如下的語句：
DIM myCon as Object
或者是
DIM myCon
那么編譯器在編譯的時候就不能得到變量的類型，而只能在運行的時候動態(tài)的得到方法的信息（通過使用接口IDispatch的方法Invoke來實現(xiàn)的），這樣為了得到方法的地址和相關(guān)的變量情況就需要在內(nèi)部進(jìn)行兩次調(diào)用，無疑就使速度降低。
當(dāng)瀏覽記錄的時候，綁定列到具體的字段對象上去
這個意思就是說在一開始的時候我們就建立對字段對象的引用，避免在每次得到記錄的時候需要在Rcordset::Fields中進(jìn)行查找而增加系統(tǒng)的開銷。
比如可以采用如下的示例代碼形式：
Private Sub TblBrowse_Click()
Dim fld1 As ADODB.Field
Dim fld2 As ADODB.Field
Dim rs As ADODB.Recordset
set rs=g_cn.execute(...) 'g_cn為全局adodb.connection對象
Set fld1 = rs.Fields("id") '數(shù)據(jù)表的字段
Set fld2 = rs.Fields("name") '數(shù)據(jù)表的字段
If rs.BOF = False Then
While rs.BOF = False
Debug.Print fld1.Value
Debug.Print fld2.Value
rs.MoveNext
Wend
End If
rs.Close
End Sub
盡量采用SQL語句和存儲過程進(jìn)行數(shù)據(jù)更新
盡管采用Recordset對象來更新數(shù)據(jù)是非常方便的，但是它的開銷也更大，所以如果可能的話，就要采用SQL語句來更新數(shù)據(jù)。使用存儲過程而不是單一的SQL語句來獲取信息。因為存儲過程是在服務(wù)器端執(zhí)行的，只把結(jié)果返回到客戶端，這樣一方面可以降低網(wǎng)絡(luò)進(jìn)行數(shù)據(jù)交互的開銷，另一方面使系統(tǒng)更加容易維護(hù)，并且保持?jǐn)?shù)據(jù)的一致性。而如果使用recordset來得到結(jié)果的話，通過數(shù)據(jù)源對象返回的查詢集不僅包含了數(shù)據(jù)，而且也包含了元數(shù)據(jù)（metadata）,在有些時候元數(shù)據(jù)可能比數(shù)據(jù)本身還要大，這樣系統(tǒng)的開銷無疑也增加了不少。
如果必須要使用游標(biāo)的話，使用集合的方法對單條的SELECT語句進(jìn)行操作
Recordset::get_Collect和Recordset::put_Collect方法是Recordset 對象的快捷方式，可以使你快速的得到一個字段的值而不需要獲得關(guān)于一個字段的引用。可以參考如下的示例代碼：
Sub Collect()
Dim rs As New Recordset
rs.ActiveConnection = "…"
rs.Source = "一條SQL查詢語句"
rs.Open
Debug.Print rs.Collect(0), rs.Collect(1), rs.Collect(2)
Debug.Print rs!au_id, rs!au_fname, rs!au_lname