将新数据插入XML文件中的指定节点

问题描述

我想在vb中使用vb插入新元素代码我的代码在频道和rss标签结束后添加新项目!!

我的xml文件看起来像：

<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:media="http://search.yahoo.com/mrss/">
<channel>

</channel>
</rss>

这是我的代码：

FilePath = "h:\root\home\ka-001\www\site1\xmlfile1.xml"
    Dim document As XDocument = New XDocument()
    If File.Exists(FilePath) Then
        document = XDocument.Load(FilePath)
    Else
        Label1.Text = "! file dosn't exist"
    End If
    If FileUpload1.HasFile = True Then
        If FileUpload1.PostedFile.ContentLength <= size Then
            Dim strPath As String
            strPath = "~/files/" & FileUpload1.FileName
            FileUpload1.SaveAs(MapPath(strPath))
        End If
    End If
    attac1 = FileUpload1.FileName
    Dim root As XElement = New XElement("item")
    Dim title As XElement = New XElement("title", New XCData(TextBox3.Text))
    Dim link As XElement = New XElement("link", TextBox6.Text)
    root.Add(title, link)
    document.Root.Add(root)
    document.Save(FilePath)
    Label1.Text = "! done"

推荐答案

Dim item = New XElement("item",
                       New XElement("title", New XCData(TextBox3.Text)),
                       New XElement("link", TextBox6.Text))
document.Root.Element("channel").Add(item)
document.Save(FilePath)

否则，澄清问题。 

按顺便说一下，既然它是一个Web应用程序，你也应该考虑多用户方面。

这篇关于将新数据插入XML文件中的指定节点的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！