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://hbruida.cn/article/ddisdig.html