Visual Basic 中学校 > Visual Basic サンプル集 > Visual Basic サンプル集目次 >
VB.NET 2002, VB.NET 2003, VB2005
DataSetの内容をデータベースに書き込む
この記事は SQL Server 2000 で動作確認しています。他のデータベースでも宣言の部分を変更すれば同じコードが実行できます。
以下の例では、データベースからauthorsと言う名前のテーブルの内容をデータセットに読み込んで、最初のレコードの列cityの値を Tokyo に変更してからデータベースに書き込む。
authorsテーブルはSQL Server付属のサンプルであるpubsデータベースのテーブルだが、テーブル名や列名の部分は自由に変更できるのでこの例はどのような場合にも対応できる。
Dim Cn As SqlClient.SqlConnection '<ここにCnのデータベースへの接続処理を追加してください。>
Dim sqlSelect As New SqlClient.SqlCommand("SELECT * FROM authors", Cn)
Dim Adapter As New SqlClient.SqlDataAdapter(sqlSelect)
Dim Builder As New SqlClient.SqlCommandBuilder(Adapter)
Dim ds As New DataSetAdapter.Fill(ds)
ds.Tables(0).Rows(0)("city") = "Tokyo"
Adapter.Update(ds)
メモ：値を１つ変更するだけならSQLのUpdate文を発行した方が効率的です。
メモ：データベースへの接続に関しては以下のリンクを参照。