开发平台版本 自动升级后,账户登入 出错了怎么解?

开发平台版本 自动升级后,账户登入,出错了??  提示 Microsoft Visual Basic
运行时错误 '-2147217865(80040e37)' :

Microsoft Access数据库引擎找不到输入表或查询Sys_Users".请确定它存在且名称拼写正确

Public Sub btnRefresh_Click()
    Dim sngStartTime As Single
    sngStartTime = Timer()
    
    ClientRunSQL "UPDATE SysLocalPendingList SET Num=0"
    
    Dim rst As Object: Set rst = OpenAdoRecordset("SELECT * FROM qry_Sys_PendingList", , CurrentProject.Connection)
    Do Until rst.EOF
        If DCount("*", "SysLocalPendingList", "Name='" & rst!Name & "'") > 0 Then
            ClientRunSQL "UPDATE SysLocalPendingList SET Num=" & rst!Num & " WHERE Name='" & rst!Name & "'"
        Else
            ClientRunSQL "INSERT INTO SysLocalPendingList(Name,Num) VALUES('" & rst!Name & "'," & rst!Num & ")"
        End If
        rst.MoveNext
    Loop
    rst.Close
    Set rst = Nothing
    Me.Requery
End Sub