你用dataset来读,可能是最容易的了
dim aa as new dataset()
dim bb as xmltextreader(url)'可以是网址,或者是文件的地方
aa.readxml(bb)
后面的自己去看看dataset的结构,可以用datagrid来看就很清楚了
dim aa as new dataset()
dim bb as xmltextreader(url)'可以是网址,或者是文件的地方
aa.readxml(bb)
后面的自己去看看dataset的结构,可以用datagrid来看就很清楚了
解决方案 »
- 字符串深度处理 。稍难,求解。。。
- 各位大虾帮小妹看看,{0:c}总是输出“¥”,如何才能输出“$”呢?
- 初学者:怎样在Text中实现格式化的输入
- 数据库操作中sql语句中含有特殊字符怎么处理,等待帮助
- 新手求教,为什么new找不到控件?
- 数据库sql插入数据失败!!!
- 如何编码将sybase中的image图片导入到oracle中的blob字段下
- framework版本冲突!用1.1版开发的控件,在有1.1和2.0版的系统中运行出现如下错误:
- 请高手给予指点和帮助,关于接口的问题,散分!在线等待。
- 高分寻求算法,立刻给分!!
- 100分送上!各位大侠门进来看看……在线等……
- 谁能告诉我com组件、api函数与.net组件间有什么联系吗?
Imports System.Xml
Imports System.Xml.XmlNode
Public Class WebForm1
Inherits System.Web.UI.Page#Region " Web Form Designer Generated Code " 'This call is required by the Web Form Designer.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent() End Sub Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: This method call is required by the Web Form Designer
'Do not modify it using the code editor.
InitializeComponent()
End Sub#End Region Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Put user code to initialize the page here
Dim objDom As New XmlDocument()
objDom.LoadXml("<?xml version='1.0' encoding='GB2312'?><Root><Family></Family></Root> ")
Dim d As New XmlDocument()
Dim root As XmlNode = objDom.DocumentElement Dim e1 As XmlElement = objDom.SelectSingleNode("/Root/Family") Dim elem As XmlElement = objDom.CreateElement("Member")
Dim elemAtt As XmlAttribute = objDom.CreateAttribute("ID")
elemAtt.Value = "XXX"
elem.Attributes.SetNamedItem(elemAtt)
e1.AppendChild(elem) Dim elem1 As XmlElement = objDom.CreateElement("MemName")
elem1.InnerText = "XXX"
Dim elem2 As XmlElement = objDom.CreateElement("MemBirth")
elem2.InnerText = "XXX"
Dim elem3 As XmlElement = objDom.CreateElement("MemPoiltic")
elem3.InnerText = "XXX"
Dim elem4 As XmlElement = objDom.CreateElement("MemDuty")
elem4.InnerText = "XXX" elem.AppendChild(elem1)
elem.AppendChild(elem2)
elem.AppendChild(elem3)
elem.AppendChild(elem4)
e1.AppendChild(elem)
objDom.Save("c:\t.xml")
Response.ContentType = "text/xml"
Response.Write((objDom.InnerXml))
End SubEnd Class
http://www.15seconds.com/issue/010522.htmthen, see my response (didn't test, so it may not work)
http://expert.csdn.net/Expert/topic/2196/2196782.xmlotherwise, ignore my reply