vb 引用adodb问题

  vb 引用adodb问题

工程--引用 后为什么工具箱上没有显示ADODB的控件呢？用ADODB如何链接Access啊？

一楼错的，是工程-引用中的，但是引用后在工具箱上看不到控件啊

鋒聲瀟瀟 | 浏览 6794 次 2010-04-04 17:10 |举报描述不清违规检举侵权投诉

我有更好的答案

可选中1个或多个下面的关键词，搜索相关资料。也可直接点“搜索资料”搜索整个问题。

• vb
• adodb
• 搜索资料

2010-04-05 12:18

# 知识大富翁 畅爽答题 乐享好礼！#

最佳答案

呃~~Adodb是没有控件的，所以看不到，但已经引用了。你打开视图-->对象浏览器就能看到了。

连接数据库的代码如下：
Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\a.mdb"
'data source后面是数据库的路径和文件名
rs.Open "Select * From TableName", db, 1, 1
'这个方式打开的是只读的，想要写就把最后那个参数改为3。具体的参数说明随后附上。自己看实际需要修改。
'这里写下数据库相关操作的语句，实现你想要的功能
rs.Close
db.Close

RS.OPEN SQL,CONN,A,B 
参数A为设定游标的类型，其取值为： 
adOpenForwardOnly  表示只允许在记录集内的记录间往前移动。这个是缺省值。 
adOpenKeyset  反映由其它用户所做的对记录的改变或者删除动作，但并不反映由其它用户做作的添加新记录的动作。 
adOpenDynamic  反映由其它用户所做的对记录的改变或者删除动作，包括添加的新记录 
adOpenStatic  不反映其它用户对记录所做的修改，添加，删除动作。 
他们的常量值定义分别是： 
adOpenForwardOnly  =  0 
adOpenKeyset  =  1 
adOpenDynamic  =  2 
adOpenStatic  =  3 

参数B为记录集的锁定类型，其取值为： 
adLockReadOnly  数据不能改变，这是缺省值！ 
adLockPessimistic  数据提供者在开始编辑数据的时候锁定记录 
adLockOptimistic    仅当调用update方法时，数据提供者锁定记录 
adLockBatchOptimistic  用于批处理修改 
他们的常量值定义分别是： 
adLockReadOnly  =  1 
adLockPessimistic  =  2 
adLockOptimistic  =  3 
adLockBatchOptimistic  =  4

最后说明一下，
如果数据库有密码，把连接字符串改一下，在最后加上：（仍在双引号里面）
;User ID=admin;Password=;Jet OLEDB:Database Password=******
不要少了分号和冒号，最后的星号是密码。

本回答由提问者推荐

举报描述不清违规检举侵权投诉| 评论

赞6 踩2

 

wml3960wml

采纳率：51% 擅长： VB 其他编程语言 数据库DB C#/.NET JAVA相关

其他回答

ADODB的控件是在“工程--部件”中加入的

ktsxzy | 2010-04-04 19:53