excel數據庫事務編程技巧 使用Recordset對象的方法操作數據庫的編程技巧

excel數據庫事務編程技巧 使用Recordset對象的方法操作數據庫的編程技巧，作為經常和辦公軟件打交道的你這些問題是不是經常困擾著你，小編今天這篇文章就是幫助你解決excel數據庫事務編程技巧這個問題，當你再次遇到excel數據庫事務編程技巧 使用Recordset對象的方法操作數據庫的編程技巧這個問題的時候，我相信你絕對不會再犯愁了，下面就跟我一起來學習一下這個知識吧！

在VBA中，Recordset對象包含很多的方法，如記錄的開啟和關閉方法Open與Close，添加新記錄方法AddNew以及記錄集更新方法Update等。本文以使用AddNew方法向數據庫中添加記錄為例來介紹使用Recordset對象的方法操作數據庫的編程技巧。

1、啟動Excel，打開Visual Basic編輯器，在工程資源管理器中插入一個模塊，在模塊的“代碼”窗口中輸入如下程序代碼：

Sub EditRecord()

Dim conn As New ADODB.Connection

Dim rs As New ADODB.Recordset

Dim fld As ADODB.Field

Dim arrFld As Variant,arrValue As Variant

conn.Provider="Microsoft.ACE.OLEDB.12.0"

conn.ConnectionString="data source"="&_ThisWorkbook.Path&"羅斯文2007.accdb"

conn.Mode=adModeReadWrite

conn.Open

rs.CursorLocation=adUseClient

rs.Open"運貨商",conn,adOpenDynamic,adLockOptimistic

Debug.Print"添加前記錄數："&rs.RecordCount

arrFld=Array("公司","地址","城市","省/市/自治區",_"郵政編碼","國家/地區")

arrValue=Array("UPS","福田車公廟工業區泰然九路",_"深圳","廣東","518040","中國")

rs.AddNew arrFld,arrValue

Debug.Print"添加前記錄數："&rs.RecordCount

End Sub

2、按F5鍵運行該過程，此時在“立即窗口”中將顯示記錄添加結果，如圖1所示。打開Access，查看“運貨商”數據表，在該數據表中添加了新的字段，如圖2所示。

圖1　“立即窗口”的輸出結果

圖2　“運貨商”數據表實際效果