vb 引用adodb问题

前端之家收集整理的这篇文章主要介绍了vb 引用adodb问题前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
vb 引用adodb问题
工程--引用 后为什么工具箱上没有显示ADODB的控件呢?用ADODB如何链接Access啊?
一楼错的,是工程-引用中的,但是引用后在工具箱上看不到控件啊
鋒聲瀟瀟 | 浏览 6794 次 2010-04-04 17:10 |举报描述不清违规检举侵权投诉
我有更好的答案

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

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=******
不要少了分号和冒号,最后的星号是密码。

其他回答

ADODB的控件是在“工程--部件”中加入的
ktsxzy | 2010-04-04 19:53

猜你在找的VB相关文章