如何将excel 2007连接到VB.NET?

如何将excel 2007连接到VB.NET?

问题描述:

有错误,不支持关键字。

参数名称:提供商...



我尝试过:



have an error,Keyword not supported.
Parameter name: provider...

What I have tried:

Imports System.Data.OleDb
Imports MySql.Data.MySqlClient
Public Class report
    Dim MySqlConnection As MySqlConnection
    Dim COMMAND As MySqlCommand
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MySqlConnection = New MySqlConnection
        MySqlConnection.ConnectionString =
          "Provider=Microsoft.ACE.OLEDB.12.0;Data Source = C:\Users\PC\Documents\connect\Book1.xls; Extended Properties-Excel 8.0; HDR=YES"


        Dim READER As MySqlDataReader

        Try
            MySqlConnection.Open()
            Dim Query As String

            Query = "insert into [Data Book1$]  values ('" & TextBox1.Text & "','" & TextBox2.Text & "') "
            COMMAND = New MySqlCommand(Query, MySqlConnection)
            READER = COMMAND.ExecuteReader

            MessageBox.Show("Succesfull")

        Catch ex As MySqlException
            MessageBox.Show(ex.Message)

        Finally
            MySqlConnection.Dispose()
        End Try
    End Sub
End Class

价值观('& TextBox1.Text& ','& TextBox2.Text& ')
COMMAND = MySqlCommand(Query,MySqlConnection)
READER = COMMAND.ExecuteReader

MessageBox.Show( Succesfull

Catch ex As MySqlException
MessageBox.Show(ex.Message)

最后
MySqlConnection.Dispose()
结束 尝试
结束 Sub
结束
values ('" & TextBox1.Text & "','" & TextBox2.Text & "') " COMMAND = New MySqlCommand(Query, MySqlConnection) READER = COMMAND.ExecuteReader MessageBox.Show("Succesfull") Catch ex As MySqlException MessageBox.Show(ex.Message) Finally MySqlConnection.Dispose() End Try End Sub End Class


MySql无法连接到Excel文件,需要OleDB。请参阅使用MS Excel(xls / xlsx)使用MDAC和Oledb [ ^ ]。
MySql does not connect to Excel files, you need OleDB. See Working with MS Excel(xls / xlsx) Using MDAC and Oledb[^].