求解：确认显:编译错误,加载DLL错误

weikitwong

某日，下载一个进销存

登录按确认后：

出现：编译错误，加载DLL错误

Public Function login() As Boolean
    Dim rst As New ADODB.Recordset
    Dim strSQL As String
    strSQL = "SELECT 员工Id, 密码 FROM 员工表 WHERE 员工Id = " & Me.cboUserName
    rst.Open strSQL, CurrentProject.Connection, adOpenStatic

    If rst.RecordCount > 0 Then
        If rst("密码") = Me.TxtPwd Then login = True
    End If
End Function

在两台脑试过，

一台OK，但另一台显示编译错误，加载DLL错误(百思不得期解。。)

操作系统一样，另一台已重装ACCESS，无果，

请指教! 谢[em01]

[此贴子已经被作者于2006-3-3 13:57:08编辑过]

skylark

重新引用一下ActiveX,可能是未引用ADO的问题.