vb点虐 处理xml的简单介绍

VB.NET 有一个XML文件，如何读取它的指定内容

你这不是一个标准的xml文件，所以建议用正则提取：

创新互联坚持“要么做到，要么别承诺”的工作理念，服务领域包括：成都做网站、成都网站制作、成都外贸网站建设、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的蓬溪网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！

Sub Main()

Dim xml = File.ReadAllText("C:\test\css.txt")

Dim rate = Regex.Match(xml, "rate([.\d]+)/rate").Groups(1).Value

Console.WriteLine(rate)

Console.ReadLine()

End Sub

使用vb点虐 如何读取XML文件

使用DataSet类来完成这项任务。

DataSet对象在传输时，是以XML流的形式而不是以COM形式传输的。DataSet对象可以读取XML数据文件或者数据流，从而将树型结构的XML数据转换成关系型的数据，如表(DataTable)、列(DataColumn)、行(DataRow)等。

在这个实例中，我们将XML文件命名为“xmlfile．xml”，具体内容如下：

?xml version=\"1．0\"standalone=”yes”?

Detail

Person

NameManish／Name

Age22／Age

／Person

／Detail \'用VB．NET读写XML文件

C1aSS WriteXML

Shared Sub main()

Dim obj DataSet As New System．Data．DataSet()

Dim strVirtualPath As String=”t．xml”

\'载入XML文件DataSet

objDataSet．ReadXml(”xmlfile．xml”)

\'通过控制器读取XML内容

Console．Write(objDataSet．GetXml)

\'从原XML文件中得到数据

ConSOle．Write(”Enter Name：”)

Dim fname，age As String

fname=ConS01e．ReadLine

\'写入你希望的代码

ConS01e．Write(”Enter Age：”)

age=Console．ReadLine

ConS0le．Write(fname＆age)

Dim v(1)As String

v(0)=fname

V(1)=age

\'增加数据DataSet

objDataSet．Tables(0)．Rows．Add(V)

\'更新XML文件

objDataSet．WriteXml(”xmlfile．xml”)

Console．Write(obj DataSet．GetXml)

End Sub

End C1ass

运行该程序有两种方式，一种是在Microso~VS．NET框架中编译完后运行；另一种则是在仿DOS的Command窗口中运行。在第一种方式中，必须加上System、System．Data、System．xML的引用。具体方法为：先创建一个空的项目，然后加入这个文件名字；在“解决方案资源管理器”中加入引用，此时需要选择相应的．dll文件；注意，xmlfile．xml文件应该放在工程的／bin目录下面。我们可以输出结果也可以用浏览器直接查看改变后的XML文件。在第二种方式中，选择桌面的“程序”一“Microso~Visual Studio．NET”一“VisualStudio．NET工具”一“Visual Studio．NET命令提示”命令，在DOS命令提示框敲入命令：[Page]

vbc／r：system．d11／r：system．data．d11／r：system．xml．d11 xml．vb其中，程序名为xml．vb，这里的3个．dll文件都是必须调用的库文件。应该在存放VB．NET文件的目录中运行上述命令，否则找不到相应的程序，当然设置PATH也可以做到。此外，Xml_vb文件应该和XML文件放在同一目录下面。每次运行此程序都会往文件中写进同样的内容，都是写入Person／，运行一次写一行。其实，我们只要稍微修改一下这个程序，就可以往XML中写入我们所需要的数据。

vb点虐 读取xml

先读取节点Match,然后读取节点内的各个属性值。 再进行节点中的子节点SetSetName的读取，读取方式也是直接读取各个属性值。

VB点虐 读取 xml问题！

Dim xmlDoc As New System.Xml.XmlDocument

xmlDoc.Load("c:\xml.xml") '载入xml文件

Dim Items As Xml.XmlNodeList = xmlDoc.DocumentElement.SelectNodes("//record/item") '参数为xpath查询串，前面斜杠，//:表示任何结点，/：表示根结点

For Each s As Xml.XmlNode In Items

Console.WriteLine(s.Attributes.GetNamedItem("id").Value  vbTab  s.InnerText)

Next

网站栏目：vb点虐 处理xml的简单介绍
分享网址：http://kswsj.com/article/ddisdig.html