***求教一DAO问题，总提示 '13'类型不匹配***

Question

代码如下：可是运行到标"*"处时，总提示类型不匹配，初次使用 DAO ，实在没看明白问题出在那里，请高手指点！！！Function preconnect()
    
   Dim mydb As Database, myset As Recordset, connectstr As String
    
    'On Error GoTo preconnect_err
    
    If Dir(App.Path + "/erp.mdb") = "" Then
        MsgBox "没有找到本地数据库 erp.mdb ，请检查！", 48, "出错提示"
     End If
     
    Set mydb = DBEngine.Workspaces(0).OpenDatabase(App.Path + "/erp.mdb")
******Set myset = mydb.OpenRecordset("select dbuser_id,dbpass_id,dsn from dbuser")
        myset.MoveLast
……

Answer 1

我对照了其它的几个源代码的例子，没发现什么不同，可就是出错！
——已经引用了 DAO 3.51

Answer 2

你是不是又引用了ADO，假如是你设置的ADO优先级比DAO高的话，可能有这个错误。

Answer 3

3x——问题已经解决！那么，如果，ADO和DAO我都要用到的话，是不是只要让DAO优先级别在前面就行了？