您的位置：程序门 -> vb -> 基础类

帮忙看看问题在哪里？

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

帮忙看看问题在哪里？

发表于：2008-01-19 12:11:11 楼主

option explicit
private conn as new adodb.connection
private reco as new adodb.recordset

private sub form_load（)
conn.open "provider=microsoft.jet.oledb.4.0;data source=" & app. _
path & "\pricelist.mdb"
reco.open "select indicatortype from indicator where indicatorno=3"
end sub

错误提示：连接无法用于此操作，在此上下文中它已经被关闭或无效。

什么意思？

发表于：2008-01-19 12:20:591楼得分:0

private sub form_load（)
conn.open "provider=microsoft.jet.oledb.4.0;data source=" _
& app.path & "\pricelist.mdb"
reco.open "select indicatortype from indicator where indicatorno=3"
end sub

发表于：2008-01-19 12:28:012楼得分:0

option explicit
private conn as new adodb.connection
private reco as new adodb.recordset

private sub form_load（)
dim strsql,strcon as string
strcon = "provider=microsoft.jet.oledb.4.0;data source=" & app.path & "\pricelist.mdb"
conn.open strcon
strsql = "select indicatortype from indicator where indicatorno=3"
reco.open strsql ,con, adopenkeyset, adlockoptimistic
end sub

发表于：2008-01-19 12:29:183楼得分:0

好像不是那里的问题，我把代码写在同一行上还是出现同样的提示

发表于：2008-01-19 12:36:144楼得分:0

private sub form_load（)
dim strsql, strcon as string
strcon = "provider=microsoft.jet.oledb.4.0;data source=" & app.path & "\pricelist.mdb"
conn.open strcon
strsql = "select indicatortype from indicator where indicatorno=3"
reco.open strsql, conn, adopenkeyset, adlockoptimistic
end sub

错误：对象"open" 的方法“_recordset" 失败

发表于：2008-01-19 12:43:275楼得分:0

我换了一个数据库文件就可以了，这是为什么？

发表于：2008-01-22 20:44:276楼得分:0

可能是vb不支持高版本的数据库文件吧
我在xp下，office2003都不能用，只有用vb自己的数据管理工具生成一个access来作为数据库用

其他资讯