我写一个数据库程序,在98系统下可以运行的,xp下运行就提示对象‘open’的方法‘connection’失败。源代码如下:
Set rec1 = CreateObject("adodb.recordset")
Set conn1 = CreateObject("adodb.connection")
strcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\xcgt1\xc.mdb"
conn1.Open strcon----------------这里报错!
strsql = "select * from 用户"
rec1.Open strsql, conn1
Combo1.Clear
Do While Not rec1.EOF
Combo1.AddItem rec1!用户名
rec1.MoveNext
Loop
请问是什么原因?是不是"工程“里的”引用“,少引用了什么?请高手赐教!
有朋友问我是不是数据库版本太高了,不存在这个问题。我用的是office2000。
Set rec1 = CreateObject("adodb.recordset")
Set conn1 = CreateObject("adodb.connection")
strcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\xcgt1\xc.mdb"
conn1.Open strcon----------------这里报错!
strsql = "select * from 用户"
rec1.Open strsql, conn1
Combo1.Clear
Do While Not rec1.EOF
Combo1.AddItem rec1!用户名
rec1.MoveNext
Loop
请问是什么原因?是不是"工程“里的”引用“,少引用了什么?请高手赐教!
有朋友问我是不是数据库版本太高了,不存在这个问题。我用的是office2000。
在引用中引用"microsoft ActiveX Data Objects 2.X Library"然后在代玛中不用CreateObject,而是用:Dim conn1 As ADODB.Connection
Set conn1 = new ADODB.Connection
strcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\xcgt1\xc.mdb"
conn1.Open strcon