VB的数据库问题!!急

guest 四川大学锦城学院 学生  2001-06-26 05:53:02
在VB中,手写源代码连接数据库,是在窗体上调用的,但是不加DATA控间就不能出现例如,
dim db as database 这段源代码,为什么??
请问,如何在编写数据库程序中比较好的写源代码才能使自己的程序比较完美,
那位大虾能帮助我,谢谢,如果有源代码,能给我E一下好吗?谢谢!!希望包括连接数据表单的源代码.
我的Email是 shanle@163.net
我的电话是0571-88211362(公司的)
...全文
103 点赞 收藏 12
写回复
12 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
guest 2001-06-28
好了,我大概找到了解决的方法,谢谢大家,是我的源代码写的有问题,也就是对象定义错误,谢谢大家帮我! :)
回复
guest 2001-06-27
看来还是要ADO的控件来支持,如果窗体上没有ADODB这个控件,好像还是不会出来象小星星说的源代码,我已经试过了,是不是我的VB出现了问题,还是我的代码写的不对??
dim db = new ADODB.Connection
在没有加入ADODB的控件时是不能出来这段代码的
我只是想知道要不要在窗体上加入ADODB这个控件,谢谢
回复
001chb 2001-06-27
引用ADO对象库后就可以不添加ADO控件
回复
pp616 2001-06-27
引用Dao3.6吧。
回复
lianghn 2001-06-27
一定要“引用”!
回复
心翦 2001-06-27
可以不要
回复
pp616 2001-06-26
引用dao库。access2000的数据库要dao3.6来支持。要是你的机子上没有。就装个sp5吧。
回复
lance 2001-06-26
为什么不看帮助?
没MSDN吗?买一套吧.
回复
mazhayang 2001-06-26
狼说的对阿
回复
小星星 2001-06-26
先引用Active Data object 2.5
Dim db As ADODB.Connection
'连接数据库
Set db = New ADODB.Connection
db.CursorLocation = adUseClient
db.Open strProvider
Set xBWStkTran = New Recordset
xBWStkTran.Open "select C.* from TB",db, adOpenStatic, dLockOptimistic
If xBWStkTran.RecordCount <= 0 Then

xBWStkTran.Close
Set xBWStkTran = Nothing
db.Close
Set db = Nothing
End If
回复
jisheng 2001-06-26
要先引用dao对象呀。
回复
guest 2001-06-26
希望大家能帮助我!!
西北人
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2001-06-26 05:53
社区公告
暂无公告