ASP.Netのお勉強

OLEDBを用いてExcelにデータを挿入・更新@ASP.Net

OLEDBを利用して、Excelに接続し、Excelにデータを挿入・更新します。

接続文字列でHDR=YESとしています。
これは、シートにヘッダー行があることを示しています。

以下では、シート名:Sheet1で、1行目にヘッダー行Code、Nameとなる
Excelブックに、Insert文とUpdate文を発行しています。

なお、Deleteは行えません。

●aspx.vb

Imports System.Data.OleDb

Partial Class Default4
    Inherits System.Web.UI.Page

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

        Dim con As OleDbConnection
        Dim cmd As OleDbCommand

        '接続文字列
        Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" _
                                        & "Data Source=C:\test\Book1.xls;" _
                                        & "Extended Properties=""Excel 8.0;HDR=YES"""

        'OleDbConnectionの生成
        con = New OleDbConnection(sConnectionString)

        '接続
        con.Open()

        'INSERT文実行
        cmd = New OleDbCommand("INSERT INTO [Sheet1$] (Code, Name) values (1, 'INSERT')", con)
        cmd.ExecuteNonQuery()

        'UPDATE文実行
        cmd = New OleDbCommand("UPDATE [Sheet1$] SET Name = 'UPDATE' WHERE Code = 2", con)
        cmd.ExecuteNonQuery()

        '接続を閉じる
        con.Close()

    End Sub
End Class


Copyright (C) ASP.Netのお勉強. All Rights Reserved.