Visual Basic 中学校 > Visual Basic サンプル集 > Visual Basic サンプル集目次 >
VB.NET 2002, VB.NET 2003, VB2005
DataSetの内容をxmlファイルに書き込む
この記事は SQL Server 2000 で動作確認しています。他のデータベースでも宣言の部分を変更すれば同じコードが実行できます。
以下の例では、データベースからauthorsと言う名前のテーブルの内容をデータセットに読み込んで、C:\Dataset.xmlに書き込む。
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 ds As New DataSetAdapter.Fill(ds)
ds.WriteXml("C:\Dataset.xml")
'インスタンスの破棄
ds.Dispose()
Adapter.Dispose()
sqlSelect.Dispose()
Cn.Dispose()
メモ：データベースへの接続に関しては以下のリンクを参照。