如何解决“ODBC 连接失败”

Question

我的程序是“搜索员工” 在 Visual Studio 2008 中使用 VB Web 应用程序 我在 Microsoft Access 中使用数据库

我在我的电脑上对其进行编程，它可以 100% 工作。但是当我将项目移动到其他计算机以上传到服务器时，它有错误

ODBC--连接到“SQL ServerWDT02418\SQLEXPRESS”失败。

WDT02418 是我电脑的名称。但我在其他计算机上运行该项目。

我像这样使用数据库连接

Function CountEmpData(ByVal EN As String, ByVal Area As String, ByVal Product_type As String) As Integer
    Dim CounterEmpData As Integer

    Try

        Dim ole As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\PROJECT_WD\e-OJT_Project6\Database\Employee.mdb")
        ole.Open()
        Dim sqlCommand As String = "SELECT COUNT(*) AS 'Counter' FROM Employee WHERE (Emp_ID LIKE '%" + EN + "%') AND (Area LIKE '%" + Area + "%') AND (Product_Type LIKE '%" + Product_type + "%')"
        Dim myCommand As New OleDbCommand(sqlCommand, ole)
        Dim myReader As OleDbDataReader = myCommand.ExecuteReader()
        While myReader.Read()
            CounterEmpData = myReader.GetInt32(0)
        End While
        myReader.Close()
        ole.Close()

    Catch ex As Exception

    End Try

    Return CounterEmpData
End Function

在线提示错误

Dim myReader As OleDbDataReader = myCommand.ExecuteReader()

有人请帮帮我！

Answer 1

除了 Access 文件的位置之外，上面的代码中没有任何特定于计算机的内容，但缺少该位置不会产生上述错误。所以我认为问题一定出在你的 .mdb 数据库中，我怀疑问题在于它包含链接到 SQL Server 的表，只有在你的机器上运行的代码才能访问。

我会通过使用 Microsoft Access UI 打开另一台计算机上的 access 数据库，打开 Employee 表并查看是否仍然出现错误来解决此问题。如果你这样做了，你就会知道出错的是 Access 数据库而不是你的代码。我猜此时 SQL Server Express 上没有设置远程连接（请参阅here 了解如何启用远程连接），或者您计算机上的某些防火墙规则阻止其他计算机连接到 SQL 实例Server Express，所以我会打开 Windows 防火墙并允许 SQL Server Express 正在侦听的端口上的入站流量，或者（更好地）将 SQL Server 从本地计算机移动到专用的开发服务器。