VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。
基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。
<< 前のTips 次のTips >>
DataSetのデータをXMLに書き込むにはDatSetオブジェクトのWriteXmlメソッドを使用します。
手順
1)変数の宣言
2)データセットにテーブルを追加する
3)テーブルにフィールドを追加する
4)フィールドに主キーを設定する
5)テーブルにレコードを追加する
6)ストリームを作成する
7)DataSetのデータをXMLに書き込む
手順1)-5)まではデータを作り出している部分なのでDataSetにデータがある場合は省略して下さい。実際に必要な部分は6),7)です。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '1)変数の宣言 Dim dtSet As DataSet = New DataSet("アドレステーブル") Dim dtTable As DataTable Dim PrimaryColumn As DataColumn Dim dtRow As DataRow '2)データセットにテーブルを追加する 'ADDRESS_TBLというテーブルを作成します dtTable = dtSet.Tables.Add("ADDRESS_TBL") '3)テーブルにフィールドを追加する '.Add("フィールド名", フィールドの型)で追加します PrimaryColumn = dtTable.Columns.Add("No", Type.GetType("System.Int32")) dtTable.Columns.Add("ZIPCODE", Type.GetType("System.String")) dtTable.Columns.Add("ADDRESS", Type.GetType("System.String")) dtTable.Columns.Add("PHONE", Type.GetType("System.String")) dtTable.Columns.Add("E-MAIL", Type.GetType("System.String")) '4)フィールドに主キーを設定します dtTable.PrimaryKey = New DataColumn() { PrimaryColumn } '5)テーブルにデータを追加する dtRow = dtTable.NewRow() dtRow("No") = "1" dtRow("ZIPCODE") = "123-4567" dtRow("ADDRESS") = "東京都のどこか" dtRow("PHONE") = "0120-111-2222" dtRow("E-MAIL") = "hoge@mail.co.jp" dtTable.Rows.Add(dtRow) '確認のためデータグリッドに表示 DataGrid1.DataSource = dtTable Dim SW As StreamWriter '6)ストリームをシフトJISエンコーディングで作成 SW = New StreamWriter("C:\Work\Test.xml", False, _ System.Text.Encoding.GetEncoding("Shift_Jis")) '7)DataSetのデータをXMLに書き込む dtSet.WriteXml(SW) End Sub
<< 前のTips 次のTips >>