主题:VB[data+access]问题
这是什么情况?
模块1
public cha as string
form1
cha= "select * from XXX where .........."
Data.Connect = "Access"
Data.DatabaseName = App.Path & "\XXX.mdb"
Data.RecordSource = cha
Data.Refresh
form2
Data.Connect = "Access"
Data.DatabaseName = App.Path & "\XXX.mdb"
Data.RecordSource = cha
Data.Refresh
在form1中可以显示查询的结果
可到了form2中
就提示错误 3011
3011的描述:Microsoft Jet 数据库引擎不能找到对象 <name>。请确定这个对象的存在,并正确拼写它的名称及路径。(错误 3011)
模块1
public cha as string
form1
cha= "select * from XXX where .........."
Data.Connect = "Access"
Data.DatabaseName = App.Path & "\XXX.mdb"
Data.RecordSource = cha
Data.Refresh
form2
Data.Connect = "Access"
Data.DatabaseName = App.Path & "\XXX.mdb"
Data.RecordSource = cha
Data.Refresh
在form1中可以显示查询的结果
可到了form2中
就提示错误 3011
3011的描述:Microsoft Jet 数据库引擎不能找到对象 <name>。请确定这个对象的存在,并正确拼写它的名称及路径。(错误 3011)