本文實例講述了使用ADODB.Connection連接access數據庫的方法，驅動類型版本為：Microsoft.Jet.OLEDB.4.0。在VB的數據庫操作中，連接數據庫是第一步，也是最基本的，本文所述的這個例子，對于初學者學習如何在VB中連接Access數據庫有著很好的借鑒參考價值。
具體實現代碼如下：
VERSION 5.00Begin VB.Form 操作數據庫 Caption = "VB操作數據庫" ClientHeight = 3645 ClientLeft = 4905 ClientTop = 4260 ClientWidth = 5895 LinkTopic = "Form1" ScaleHeight = 3645 ScaleWidth = 5895EndAttribute VB_Name = "操作數據庫"Attribute VB_GlobalNameSpace = FalseAttribute VB_Creatable = FalseAttribute VB_PredeclaredId = TrueAttribute VB_Exposed = FalseOption ExplicitPrivate Sub Form_Load()Dim 數據庫 As ObjectSet 數據庫 = New ADODB.ConnectionCall 數據庫.Open("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=Data.mdb;") '連接數據庫If ((數據庫.State) = (adStateOpen)) Then MsgBox ("連接成功！")Else MsgBox ("連接失敗！")End If數據庫.CloseSet 數據庫 = NothingEnd Sub這個實例建立了一個名為“數據庫”的New ADODB.Connection對象，用此對象增連接數據庫，在連接成功后，彈出消息框告之連接結果，在大多數情況下，VB與Access2003之前版本的數據庫連接，基本都這樣。測試數據庫請放在VB同級目錄下，Data.mdb可根據自己實際的數據庫路徑進行修改。
新聞熱點
疑難解答
圖片精選
