关于数据库联结问题
www.dimcax.com
关于数据库联结问题
在vba中用下列语句连结数据库
set conn = new adodb.connection
conn.cursorlocation = aduseclient
conn.provider = "microsoft.jet.oledb.4.0;"
connstr = "data surce=d:\制图\数据库\塔巴庙探井.mdb;"
conn.open connstr
但运行时出现错误如下:
compile error:
can't find project or library
我引用的是microsoft activex data objects 2.5 library
请问如何解决?非常感谢!
菜单 工具 -〉引用-〉micorsoft access 11.0 objects library 试试
set public conn as new adodb.connection '定义新连接
public cmd as new adodb.command '定义指令
public rs as new adodb.recordset '定义两个记录集
set conn = new connection
conn.open "provider=microsoft.jet.oledb.4.0;data source=d:\制图\数据库\塔巴庙探井.mdb"
set cmd.activeconnection = conn
cmd.commandtext = "select * from 表名"
rs.cursorlocation = aduseclient
rs.open cmd, , adopenstatic, adlockbatchoptimistic