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
|