快捷導(dǎo)航

VB6實(shí)現(xiàn)連接Access數(shù)據(jù)庫(kù)的ADODB代碼實(shí)現(xiàn)方法

更新時(shí)間：2014年07月31日 14:57:49 投稿：shichen2014

這篇文章主要介紹了VB6實(shí)現(xiàn)連接Access數(shù)據(jù)庫(kù)的ADODB代碼實(shí)現(xiàn)方法,對(duì)于初學(xué)者掌握VB鏈接access數(shù)據(jù)庫(kù)有著很好的借鑒價(jià)值,需要的朋友可以參考下

本文實(shí)例講述了使用ADODB.Connection連接access數(shù)據(jù)庫(kù)的方法，驅(qū)動(dòng)類型版本為：Microsoft.Jet.OLEDB.4.0。在VB的數(shù)據(jù)庫(kù)操作中，連接數(shù)據(jù)庫(kù)是第一步，也是最基本的，本文所述的這個(gè)例子，對(duì)于初學(xué)者學(xué)習(xí)如何在VB中連接Access數(shù)據(jù)庫(kù)有著很好的借鑒參考價(jià)值。

具體實(shí)現(xiàn)代碼如下：

VERSION 5.00
Begin VB.Form 操作數(shù)據(jù)庫(kù) 
  Caption     =  "VB操作數(shù)據(jù)庫(kù)"
  ClientHeight  =  3645
  ClientLeft   =  4905
  ClientTop    =  4260
  ClientWidth   =  5895
  LinkTopic    =  "Form1"
  ScaleHeight   =  3645
  ScaleWidth   =  5895
End
Attribute VB_Name = "操作數(shù)據(jù)庫(kù)"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit
Private Sub Form_Load()
Dim 數(shù)據(jù)庫(kù) As Object
Set 數(shù)據(jù)庫(kù) = New ADODB.Connection
Call 數(shù)據(jù)庫(kù).Open("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=Data.mdb;") '連接數(shù)據(jù)庫(kù)
If ((數(shù)據(jù)庫(kù).State) = (adStateOpen)) Then
  MsgBox ("連接成功！")
Else
  MsgBox ("連接失?。?)
End If
數(shù)據(jù)庫(kù).Close
Set 數(shù)據(jù)庫(kù) = Nothing
End Sub

這個(gè)實(shí)例建立了一個(gè)名為“數(shù)據(jù)庫(kù)”的New ADODB.Connection對(duì)象，用此對(duì)象增連接數(shù)據(jù)庫(kù)，在連接成功后，彈出消息框告之連接結(jié)果，在大多數(shù)情況下，VB與Access2003之前版本的數(shù)據(jù)庫(kù)連接，基本都這樣。測(cè)試數(shù)據(jù)庫(kù)請(qǐng)放在VB同級(jí)目錄下，Data.mdb可根據(jù)自己實(shí)際的數(shù)據(jù)庫(kù)路徑進(jìn)行修改。

您可能感興趣的文章:

相關(guān)文章

在VB中遍歷文件并用正則表達(dá)式完成復(fù)制及vb實(shí)現(xiàn)重命名、拷貝文件夾的方法
這篇文章主要介紹了在VB中遍歷文件并用正則表達(dá)式完成復(fù)制及vb實(shí)現(xiàn)重命名、拷貝文件夾的方法,需要的朋友可以參考下
2018-12-12
使用WMI得到計(jì)算機(jī)的信息
WMI是一項(xiàng)行業(yè)推薦規(guī)范，旨在為訪問企業(yè)環(huán)境中的管理信息而開發(fā)一種標(biāo)準(zhǔn)化技術(shù)。該信息包括系統(tǒng)內(nèi)存的狀態(tài)、當(dāng)前安裝的客戶應(yīng)用程序清單，以及有關(guān)客戶端狀態(tài)的其他數(shù)據(jù)
2019-04-04
VB實(shí)現(xiàn)的《QQ美女找茬游戲》作弊器實(shí)例
這篇文章主要介紹了VB實(shí)現(xiàn)的《QQ美女找茬游戲》作弊器,以一個(gè)完整實(shí)例形式分析了VB實(shí)現(xiàn)《QQ美女找茬游戲》作弊器的相關(guān)技巧,需要的朋友可以參考下
2015-06-06
淺談如何使用vb.net從數(shù)據(jù)庫(kù)中提取數(shù)據(jù)
這篇文章主要介紹了淺談如何使用vb.net從數(shù)據(jù)庫(kù)中提取數(shù)據(jù)，使用VB提取數(shù)據(jù)，是先查找，做成數(shù)組，再顯示到數(shù)據(jù)里，如果感興趣可以了解一下
2020-07-07
VB鍵盤鼠標(biāo)無動(dòng)作調(diào)用程序的嘗試
這篇文章主要介紹了VB鍵盤鼠標(biāo)無動(dòng)作調(diào)用程序的嘗試，記錄下整個(gè)思路和過程，有需要的小伙伴可以參考下。
2015-06-06
分享如何在VB中調(diào)用VC編寫的DLL
一般來說，VB和VC共同編程有3種方式：一種是VC生成DLL，在VB中調(diào)用DLL；一種是VC生成ActiveX控件(.ocx)，在VB中插入；還有一種是在VC中生成ActiveX Automation服務(wù)器，在VB中調(diào)用
2013-04-04
VB關(guān)機(jī)惡搞小程序
本文給大家匯總了一些使用VB實(shí)現(xiàn)的關(guān)機(jī)惡搞小程序，大家娛樂一下就行了，千萬別做壞事哦
2015-09-09
VB簡(jiǎn)單實(shí)現(xiàn)防止文件被改寫
這篇文章主要介紹了VB簡(jiǎn)單實(shí)現(xiàn)防止文件被改寫的方法，十分的簡(jiǎn)單實(shí)用，有需要的小伙伴可以參考下。
2015-06-06
VBA中連接SQLSERVER數(shù)據(jù)庫(kù)例子
這篇文章主要介紹了VBA中連接SQLSERVER數(shù)據(jù)庫(kù)例子,VBA是指Visual Basic for Applications,是Visual Basic的一種宏語(yǔ)言,需要的朋友可以參考下
2014-07-07
VB語(yǔ)言使用ADO連接、操作SQLServer數(shù)據(jù)庫(kù)教程
這篇文章主要介紹了VB語(yǔ)言使用ADO連接、操作SQLServer數(shù)據(jù)庫(kù)教程,本文講解詳細(xì)、代碼中有大量注釋,是非常好的一篇教程,需要的朋友可以參考下
2014-08-08