asp.net下创建、查询、修改带名称空间的 XML 文件的例子

2007-04-13 00:00:00 作者：

C#：

string w3NameSpace = "http://www.w3.org/2000/xmlns/";
System.Xml.XmlDocument doc = new System.Xml.XmlDocument();

//创建根节点
System.Xml.XmlNode root = doc.CreateNode(System.Xml.XmlNodeType.Element, "w", "wordDocument", "http://schemas.microsoft.com/office/word/2003/2/wordml");
System.Xml.XmlAttribute xa;
xa = doc.CreateAttribute("xmlns", "v", w3NameSpace);
xa.Value = "urn:schemas-microsoft-com:vml";
root.Attributes.Append(xa);

//为节点添加属性
xa = doc.CreateAttribute("xmlns", "w10", w3NameSpace);
xa.Value = "urn:schemas-microsoft-com:office:word";
root.Attributes.Append(xa);

xa = doc.CreateAttribute("xmlns", "SL", w3NameSpace);
xa.Value = "http://schemas.microsoft.com/schemaLibrary/2003/2/core";
root.Attributes.Append(xa);

xa = doc.CreateAttribute("xmlns", "aml", w3NameSpace);
xa.Value = "http://schemas.microsoft.com/aml/2001/core";
root.Attributes.Append(xa);

xa = doc.CreateAttribute("xmlns", "wx", w3NameSpace);
xa.Value = "http://schemas.microsoft.com/office/word/2003/2/auxHint";
root.Attributes.Append(xa);

xa = doc.CreateAttribute("xmlns", "o", w3NameSpace);
xa.Value = "urn:schemas-microsoft-com:office:office";
root.Attributes.Append(xa);

xa = doc.CreateAttribute("xmlns", "dt", w3NameSpace);
xa.Value = "uuid:C2F41010-65B3-11d1-A29F-00AA00C14882";
root.Attributes.Append(xa);

xa = doc.CreateAttribute("xmlns", "space", w3NameSpace);
xa.Value = "preserve";
root.Attributes.Append(xa);

//为节点增加值
System.Xml.XmlNode body = doc.CreateNode(System.Xml.XmlNodeType.Element, "v", "body", "urn:schemas-microsoft-com:vml");
System.Xml.XmlNode childNode = doc.CreateNode(System.Xml.XmlNodeType.Element, "o", "t", "urn:schemas-microsoft-com:office:office");
childNode.InnerText = "欢迎光临【孟宪会之精彩世界】";

//添加到内存树中
body.AppendChild(childNode);
root.AppendChild(body);
doc.AppendChild(root);

//添加节点声明
System.Xml.XmlDeclaration xd = doc.CreateXmlDeclaration("1.0", "UTF-8", "yes");
doc.InsertBefore(xd, doc.DocumentElement);

//添加处理指令
System.Xml.XmlProcessingInstruction spi = doc.CreateProcessingInstruction("mso-application", "progid=\"Word.Document\"");
doc.InsertBefore(spi, doc.DocumentElement);

//查询节点
System.Xml.XmlNamespaceManager nsmanager = new System.Xml.XmlNamespaceManager(doc.NameTable);
nsmanager.AddNamespace("w", "http://schemas.microsoft.com/office/word/2003/2/wordml");
nsmanager.AddNamespace("v", "urn:schemas-microsoft-com:vml");
nsmanager.AddNamespace("o", "urn:schemas-microsoft-com:office:office");
System.Xml.XmlNode node = doc.SelectSingleNode("w:wordDocument/v:body/o:t", nsmanager);
Response.Write(node.InnerText);

node.InnerText = "欢迎光临【孟宪会之精彩世界】:http://dotnet.aspx.cc/";

//创建CDATA节点
System.Xml.XmlCDataSection xcds = doc.CreateCDataSection("<a href='http://dotnet.aspx.cc/'>【孟宪会之精彩世界】</a>");
node.ParentNode.InsertAfter(xcds, node);

Response.Write(xcds.InnerText);

doc.Save(Server.MapPath("test.xml"));

VB.net

Dim w3NameSpace As String = "http://www.w3.org/2000/xmlns/"
Dim doc As New System.Xml.XmlDocument

'创建根节点
Dim root As System.Xml.XmlNode = doc.CreateNode(System.Xml.XmlNodeType.Element, "w", "wordDocument", "http://schemas.microsoft.com/office/word/2003/2/wordml")
Dim xa As System.Xml.XmlAttribute
xa = doc.CreateAttribute("xmlns", "v", w3NameSpace)
xa.Value = "urn:schemas-microsoft-com:vml"
root.Attributes.Append(xa)

'为节点添加属性
xa = doc.CreateAttribute("xmlns", "w10", w3NameSpace)
xa.Value = "urn:schemas-microsoft-com:office:word"
root.Attributes.Append(xa)

xa = doc.CreateAttribute("xmlns", "SL", w3NameSpace)
xa.Value = "http://schemas.microsoft.com/schemaLibrary/2003/2/core"
root.Attributes.Append(xa)

xa = doc.CreateAttribute("xmlns", "aml", w3NameSpace)
xa.Value = "http://schemas.microsoft.com/aml/2001/core"
root.Attributes.Append(xa)

xa = doc.CreateAttribute("xmlns", "wx", w3NameSpace)
xa.Value = "http://schemas.microsoft.com/office/word/2003/2/auxHint"
root.Attributes.Append(xa)

xa = doc.CreateAttribute("xmlns", "o", w3NameSpace)
xa.Value = "urn:schemas-microsoft-com:office:office"
root.Attributes.Append(xa)

xa = doc.CreateAttribute("xmlns", "dt", w3NameSpace)
xa.Value = "uuid:C2F41010-65B3-11d1-A29F-00AA00C14882"
root.Attributes.Append(xa)

xa = doc.CreateAttribute("xmlns", "space", w3NameSpace)
xa.Value = "preserve"
root.Attributes.Append(xa)

'为节点增加值
Dim body As System.Xml.XmlNode = doc.CreateNode(System.Xml.XmlNodeType.Element, "v", "body", "urn:schemas-microsoft-com:vml")
Dim childNode As System.Xml.XmlNode = doc.CreateNode(System.Xml.XmlNodeType.Element, "o", "t", "urn:schemas-microsoft-com:office:office")
childNode.InnerText = "欢迎光临【孟宪会之精彩世界】"

'添加到内存树中
body.AppendChild(childNode)
root.AppendChild(body)
doc.AppendChild(root)

'添加节点声明
Dim xd As System.Xml.XmlDeclaration = doc.CreateXmlDeclaration("1.0", "UTF-8", "yes")
doc.InsertBefore(xd, doc.DocumentElement)

'添加处理指令
Dim spi As System.Xml.XmlProcessingInstruction = doc.CreateProcessingInstruction("mso-application", "progid=""Word.Document""")
doc.InsertBefore(spi, doc.DocumentElement)

'查询节点
Dim nsmanager As New System.Xml.XmlNamespaceManager(doc.NameTable)
nsmanager.AddNamespace("w", "http://schemas.microsoft.com/office/word/2003/2/wordml")
nsmanager.AddNamespace("v", "urn:schemas-microsoft-com:vml")
nsmanager.AddNamespace("o", "urn:schemas-microsoft-com:office:office")
Dim node As System.Xml.XmlNode = doc.SelectSingleNode("w:wordDocument/v:body/o:t", nsmanager)
Response.Write(node.InnerText)

node.InnerText = "欢迎光临【孟宪会之精彩世界】:http://dotnet.aspx.cc/"

'创建CDATA节点
Dim xcds As System.Xml.XmlCDataSection = doc.CreateCDataSection("<a href='http://dotnet.aspx.cc/'>【孟宪会之精彩世界】</a>")
node.ParentNode.InsertAfter(xcds, node)

Response.Write(xcds.InnerText)

doc.Save(Server.MapPath("test.xml"))

asp.net下创建、查询、修改带名称空间的 XML 文件的例子

您可能感兴趣的文章: