tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re: XMLファイルにデータを追加したいです
投稿日: 2006/01/12(Thu) 23:44
投稿者なおこ(・∀・)
お世話になります。

こんな感じでいかがでしょうか。
Dim xmlpath As String = System.IO.Path.Combine(Application.StartupPath, "test.xml")
Dim doc As Xml.XmlDocument = New Xml.XmlDocument
doc.Load(xmlpath)
Dim membersNode As Xml.XmlNode
membersNode = doc.SelectSingleNode("Contents2/Members")

Dim accountNode As Xml.XmlElement = doc.CreateElement("Account2")
With accountNode
  Dim nameNode As Xml.XmlElement = doc.CreateElement("Name")
  nameNode.InnerText = "Account4"
  .AppendChild(nameNode)

  Dim linkNode As Xml.XmlElement = doc.CreateElement("Link")
  linkNode.InnerText = "hhttp://www"
  .AppendChild(linkNode)

  Dim dataNode As Xml.XmlElement = doc.CreateElement("Data")
  dataNode.InnerText = "C:\data"
  .AppendChild(dataNode)
End With
membersNode.AppendChild(accountNode)

doc.Save(xmlpath)

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。