Question

我已经完成了开发并尝试了调试器并且代码在我的笔记本电脑中运行良好，但是在发布或甚至使用发布模式而不是在其他计算机中使用它时显示空异常

这部分代码

     For Each r As DataRow In Access.dbDataTable.Rows
        Check = r("EmployeeType")
    Next

这个用于登录表单，是的，我忘了提到我使用Access DB 我真的很困惑它的工作比为什么它显示异常

顺便说一下我的连接字符串

Dim mypath = Application.StartupPath & "\test.accdb"
Dim mypassword = "test"
Private dbConnection As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & mypath & ";Jet OLEDB:Database Password=" & mypassword)

显示的

异常是NullRefrenceException

Answer 1

如果有人遇到同样的问题，我已经解决了这个问题尝试检查ms访问的版本，它应该具有相同的版本还检查连接字符串

Private dbConnection As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & mypath & ";Jet OLEDB:Database Password=" & mypassword)

Microsoft.ACE.OLEDB.12.0需要更改为相同版本的ms访问目标PC

在其他计算机上运行已发布项目

1 个答案: