【VB.net】EXCEL数据导入至MYSQL

最新推荐文章于 2023-02-16 11:19:12 发布

qq_21277361

最新推荐文章于 2023-02-16 11:19:12 发布

阅读量915

点赞数

文章标签： VB.net MySql Excel

本文链接：https://blog.csdn.net/qq_21277361/article/details/81234835

版权


Imports System.Data
Imports Microsoft.SqlServer.Server
Imports MySql.Data.MySqlClient
Imports System.Data.OleDb
Imports Excel = Microsoft.Office.Interop.Excel

Public Class Form1

 Private Sub ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 导入ToolStripMenuItem1.Click

        Try
            Dim fileName As String
            OpenFileDialog1.ShowDialog()
            fileName = OpenFileDialog1.FileName
            '建立EXCEL连接，读入数据，支持 Microsoft Excel 2010
            Dim strConn As String = "Provider= Microsoft.Ace.OleDb.12.0;Data Source='" & fileName & "';Extended Properties=Excel 12.0;"
            '建立EXCEL连接，读入数据，支持 Microsoft Excel 2003
            'Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & fileName & "';Extended Properties=E