VB.NET:AccessVilolationException 在 OleDB 中未处理

Question

这个错误对我来说是新的。它显示试图读取或写入受保护的内存。这通常表示其他内存已损坏。

这个错误在这个代码块中指出：

Dim cn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" + textSelectFiles.Text + ";Extended Properties=Excel 8.0;")
Dim da As New OleDbDataAdapter("SELECT * FROM [" & ComboBox1.SelectedValue & "]", cn)
Dim dt As New DataTable
da.Fill(dt)

我错过了什么还是什么？提前感谢您的建议和提示。

Answer 1

使用此代码

Dim constr As String
Dim dt As DataTable
Dim con As OleDbConnection
Dim sda As OleDbDataAdapter
Dim row As DataRow
Try
    constr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + txtOpen.Text + ";Excel 12.0 Xml;HDR=YES"
    con = New OleDbConnection(constr)
    sda = New OleDbDataAdapter("Select * from [" + cboSheet.SelectedValue + "]", con)
    dt = New DataTable
    sda.Fill(dt)
    For Each row In dt.Rows
        DataGridView3.DataSource = dt
    Next
Catch ex As Exception
    MessageBox.Show(ex.Message)
End Try

我希望它会起作用！