vb.net，ms访问链接无法建立 [英] vb.net, ms access link could not be established

问题描述

Public Class Form1
    'Dim dbProvider As String = "Provider=Microsoft.ace.oledb.12.0;"
    'Dim dbSource As String = "Data Source=~\bin\Debug\EC_Database_2.accdb"
    'Dim constr As String = dbProvider & dbSource
    Dim conn As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & System.Environment.CurrentDirectory & "\EC_Database.mdb")
    Dim mstr As String = ""


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try

        
            conn.Open()
            mstr = "Select person_ref from QN_Person_Mast order by person_ref asc"
            Dim sda1 As OleDbDataAdapter = New OleDbDataAdapter(mstr, conn)
            Dim dt1 As DataTable = New DataTable()
            sda1.Fill(dt1)
            If dt1.Rows.Count > 0 Then
                ComboBox1.Items.Clear()
                For i As Integer = 0 To dt1.Rows.Count - 1
                    ComboBox1.Items.Add(dt1.Rows(i)("person_ref"))
                Next
            End If
            conn.Close()

        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub
End Class

我将访问文件保存在bin\debug \ ....但错误是：



''Microsoft.Jet.OLEDB.4.0''提供商未在本地机器上注册。

请帮助我....



添加的代码块[/ edit]

推荐答案

检查这个

''Microsoft.Jet.OLEDB.4.0 ''提供商未在本地计算机上注册 [ ^ ]

这篇关于vb.net，ms访问链接无法建立的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！