适用于：

Microsoft® .NET Compact Framework 1.0
Microsoft Visual Studio® .NET 2003

摘要：了解如何在 Microsoft Windows .NET Compact Framework 应用程序中使用和管理可扩展标记语言 (XML)。XML 在移动应用程序开发中最常见的用法是用于与服务器端应用程序通信。如果数据量适中，XML 还可以用作本地存储格式，取代本地的关系数据库。要了解有关通信和本地存储方案的示例，请继续阅读。本文中的示例代码是用 Microsoft Visual Basic .NET 编写的。（本文包含一些指向英文站点的链接。）

目录

简介
使用 XmlReader 类
使用 XmlDocument 类
使用 ADO.NET DataSet 类
小结

简介

在 .NET Compact Framework 中，主要有三种方法可以与 XML 配合使用：

• 使用 XmlReader and XmlWriter 类
• 使用 XmlDocument 类，该类是文档对象模型 (DOM) 的实现
• 使用 ADO.NET DataSet 类，该类可以读取和写入本地存储的 XML 文件

XmlDocument 类提供了 XML 文档的分层表示形式，并且提供了丰富的动态功能集以便与 XML 数据配合使用。由于 XmlDocument 将整个 XML 文档都存放在内存中，并且与其他方案相比并非最快，因此此方法仅适用于较小的 XML 文档（小于 1 MB）。

XmlReader 和 XmlWriter 在连续读取和写入 XML 数据时比 XmlDocument 快得多。这些类是带有 XmlTextReader 和 XmlTextWriter 类中实现的方法的抽象类。

在服务器和移动客户端上利用 .NET Framework 技术的项目通常会针对 ADO.NET 数据集对数据交换进行标准化。数据集（包括其数据和架构）可以使用 WriteXml 和 WriteXmlSchema 方法存储为 XML 文件，也可以使用方法 GetXml 和 GetXmlSchema 实例化和填充。

要使用任何 XML 相关的类，您必须使用 Microsoft® Visual Basic® .NET 中的 Imports System.XML 语句或使用 C# 中的 using System.XML 声明将 System.XML 命名空间导入到您的类中。有关 XML 的信息，请参阅 http://www.w3.org/xml 上的 XML 1 规范。此处引用的示例代码是使用 Microsoft Visual Studio .NET 2003、C# 和 .NET Compact Framework 创建的。示例中使用的数据库是 Northwind 数据库。一些示例代码依赖于 SQLXML 3.0 中的托管代码。

使用 XmlReader 类

XmlReader 类可以从 URL、流和文件中读取 XML。以下示例显示了如何实现 XmlReader。

代码演示

示例代码构建在以下三层中：

• 数据库（存储过程）
• Web 服务
• Pocket PC 应用程序

让我们从数据库开始。Northwind 数据库有一个“Products”表，可以将其中的数据转换为 XML 格式。为了以 XML 格式获取结果集，SELECT 语句中使用了“FOR XML AUTO, ELEMENTS”关键字。

CREATE PROCEDURE GetProducts AS

SET NOCOUNT ON

SELECT ProductID,
ProductName,
UnitsInStock,
UnitsOnOrder,
ReorderLevel
FROM Products
FOR XML AUTO, ELEMENTS
          

从这里开始，会有一些选择。常见的选择为：是通过 Web 服务提供存储过程，还是使用 SQLXML 3.0 直接从 SQL Server 2000 提供存储过程。在本例中，XML 直接从 SQL Server 2000 传递。有关如何完成此操作的详细信息，请参阅 MSDN® Magazine 文章 Build Data-Driven Web Services with Updated XML Support for SQL Server 2000。最后，以下代码在 Pocket PC 应用程序中实现了 XmlTextReader：

Dim xmlreader As New XmlTextReader("http://servername/Northwind1/Products.xml")
xmlreader.WhitespaceHandling = WhitespaceHandling.None
xmlreader.MoveToContent()
While xmlreader.Read
    ' 循环通过 XmlTextReader...
            Select Case xmlReader.Name
                Case "firstName"
                    customer.firstName = xmlReader.ReadString
                Case "lastName"
                    customer.lastName  = xmlReader.ReadString
                Case "zip"
                    customer.zip = Integer.Parse(xmlReader.ReadString)
            End Select
End While
xmlreader.Close()
          

如果要快速顺序读取 XML，XMLReader 是一个非常优秀的结构。

使用 XmlDocument 类

XmlDocument 将整个 XML 文档都存放在内存中，并使其节点、元素和属性可用于编程处理。XmlDocument 类可以：

• 从本地存储的文件中读取 XML，并使用流对象 XmlReader 和 TextReader
• 将 XML 写入本地存储的文件，并使用流对象 XmlWriter 和 TextWriter

代码演示

以下代码演示了如何使用 XmlDocument 创建 XML 文件。这是 XML 文件。

  <?xml version="1.0" encoding="ISO-8859-1" ?> 
- <Products Date="2003-05-09 00:00:00">
  <Product Name="Butter" Price="3.95" /> 
  </Products>
          

这是用于生成 XML 文件的代码：

Dim oXMLDOM As New XmlDocument
' 创建 Products 根元素
Dim oRoot As XmlElement = oXMLDOM.CreateElement("Products")
oXMLDOM.appendChild(oRoot)
' 在 Products 级别设置日期和时间
Dim oProductsInformation As XmlAttribute = oXMLDOM.CreateAttribute("Date")
oProductsInformation.InnerText = Date.Today.ToString
oRoot.SetAttributeNode(oProductsInformation)
' 创建新的 Product 元素
Dim oProduct As XmlElement = oXMLDOM.CreateElement("Product")
oRoot.appendChild(oProduct)
' 设置 Product 属性（Name 和 Price）
Dim oProductName As XmlAttribute = oXMLDOM.CreateAttribute("Name")
oProductName.InnerText = "Butter"
oProduct.setAttributeNode(oProductName)
Dim oProductPrice As XmlAttribute = oXMLDOM.CreateAttribute("Price")
oProductPrice.innerText = "3.95"
oProduct.SetAttributeNode(oProductPrice)
'创建 XML 处理指令。
Dim oXMLPI As XmlProcessingInstruction = 
oXMLDOM.CreateProcessingInstruction("xml", "version='1.0' 
encoding='ISO-8859-1'")
'将处理指令附加到 XML 文档中。
oXMLDOM.InsertBefore(oXMLPI, oXMLDOM.ChildNodes(0))
' 保存文档
oXMLDOM.Save("\Products.xml")
          

以下示例代码演示了如何读取本地存储的 XML 文件并使用 XML 文件的内容填充 XmlDocument。

Dim xmldocument As New XmlDocument
xmldocument.Load("\Products.xml")
          

使用 ADO.NET DataSet 类

ADO.NET DataSet 本质上是一个 XML 结构，因此在基于 XML 的通信和持久性操作中使用该类的效果非常好。在应用程序会话之间，数据集可以存储为本地 XML 文件。从数据集中检索的 XML 可以在客户端与服务器之间的系统集成中轻松使用，特别是当服务器还依赖于 .NET Framework 时。然后，传递给服务器的 XML 文件可用于实例化和填充可在服务器上处理的数据集。

代码演示

以下示例演示了如何从本地 XML 文件实例化 DataSet、进行更改并将 DataSet 写回本地 XML 文件。

由于 Compact Framework 中的 DataSet 实现不允许加载包含架构信息（元数据）的 XML 文件，架构需要存储在单独的 XML 文件中。因此，将先读取架构 XML 文件 (XSD)，然后再读取实际的数据 XML。

Dim ds As DataSet = New DataSet
' 加载 DataSet（以及架构）
ds.ReadXmlSchema("\Program Files\FeedbackAnyplace\feedback.xsd")
ds.ReadXml("\Program Files\FeedbackAnyplace\feedback.xml")
          

以下子程序显示了如何删除元素（DataSet 行）并将 XML 写回文件。子程序将 ID 和 DataSet 用作参数。

Public Sub DeleteByID(ByVal ID As String, ByVal ds As DataSet)
' 按 ID 删除项
Dim expr As String
' 设置搜索条件
expr = "ID = '" + ID + "'"
' 删除行
ds.Tables("Feedback").Rows.Remove(ds.Tables("Feedback").Select(expr)(0))
' 保存数据
ds.AcceptChanges()
ds.WriteXml("\Program Files\FeedbackAnyplace\feedback.xml")
End Sub
          

最后，以下代码显示了如何添加元素并将 XML 写回文件：

' 在表中添加新行
Dim dr As DataRow = ds.Tables("Feedback").NewRow()
' 设置数据行属性
dr("ID") = m_ID
' 如果有新项，则向数据集添加行
ds.Tables("Feedback").Rows.Add(dr)
' 保存数据
ds.AcceptChanges()
ds.WriteXml("\Program Files\FeedbackAnyplace\feedback.xml")
          

小结

使用可通过编程方式控制 XML 的许多类型和类，有几种方法可在 Compact Framework 中使用和管理 XML。有必要了解每个方法的特性，以便每次都能够选用最恰当的解决方案。