vb与数据库连接的问题

qong 2003-10-15 08:59:39
小弟在vb访问数据库时遇到以下问题:
Dim conn As adodb.connection
Set conn = New adodb.connection
dim cmd as adodb.command
set cmd=new adodb.command
dim rst as adodb.recordset
set rst=new adodb.recordset
conn.connectiongstring= "Provider=SQLOLEDB;User ID=sa;Password=;database=gaojianchuli;Data Source=(local)"
conn.Open
cmd.commandtext = "select* from zuozhe where '"
cmd.execute
.......
在编译的时候出现"用户定义类型未定义"的错误提示
小弟认为是ado的问题,就重新装了mdac,以前在asp中可以顺利的访问,亟待高手赐教,小弟不胜感激!!!
...全文
31 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
zz124 2003-10-16
  • 打赏
  • 举报
回复
我也刚出现过这个问题,在引用里添加了 Microsoft ActiveX Data Objects 2.6Library 后就没问题了,如果还有问题,在添加上述引用的基础上。
dim rst as adodb.recordset
sql = "select * from zuozhe where 条件“
rs.open sql,conn
你就可以打开表了
如果要对表进行添加。修改,删除,操作
rs.open sql,conn,adOpenKeyset, adLockPessimistic
liaorui 2003-10-16
  • 打赏
  • 举报
回复
应该是引用 Microsoft ActiveX Data Objects 2.x Library 是的问题。

先确定你的版本是多少。一定要用2.5以上
TBNTB 2003-10-16
  • 打赏
  • 举报
回复
Dim conn As new adodb.connection
dim cmd as new adodb.command
dim rst as new adodb.recordset

conn.connectiongstring= "Provider=SQLOLEDB;User ID=sa;Password=;database=gaojianchuli;Data Source=(local)"
conn.Open
cmd.commandtext = "select* from zuozhe"
cmd.execute

如果這樣不行的話﹐那就是沒有引用
Microsoft ActiveX Data Objects 2.x Library項目﹐
請用lang_ch77(飞狐) 的方法引用項目就可以了
lijinqiang 2003-10-15
  • 打赏
  • 举报
回复
Dim conn As adodb.connection
Set conn = New adodb.connection
dim rst as adodb.recordset
set rst=new adodb.recordset
conn.connectiongstring= "Provider=SQLOLEDB;User ID=sa;Password=;database=gaojianchuli;Data Source=(local)"
conn.Open
rst.open "select* from zuozhe ",conn,adOpenForwardOnly
这样就可以了!
lang_ch77 2003-10-15
  • 打赏
  • 举报
回复
工程->引用,找到"Microsoft ActiveX Data Objects 2.x Library",复选,确定。(x值依ADO版本不同而不同)
hengxin54 2003-10-15
  • 打赏
  • 举报
回复
你的sql语句语法错误,把where后面的去掉后试试

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧