vb与数据库连接的问题

Question

小弟在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中可以顺利的访问，亟待高手赐教，小弟不胜感激！！！

Answer 1

你的sql语句语法错误，把where后面的去掉后试试

Answer 2

工程->引用，找到"Microsoft ActiveX Data Objects 2.x Library"，复选，确定。(x值依ADO版本不同而不同)

Answer 3

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
这样就可以了！

Answer 4

Dim conn As new adodb.connection
dim cmd as new adodb.command
dim rst as new adodb.recordsetconn.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(飞狐) 的方法引用項目就可以了

Answer 5

应该是引用 Microsoft ActiveX Data Objects 2.x Library 是的问题。先确定你的版本是多少。一定要用2.5以上

Answer 6

我也刚出现过这个问题，在引用里添加了 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