关闭

Vb操作XML例子

标签: vbxmlobjectintegerstring
1024人阅读 评论(0) 收藏 举报
分类:

Dim xmlFile As Object
Dim xmlElement As Object
Dim xmlItem As Object

Set xmlFile = CreateObject("Microsoft.XMLDOM")
xmlFile.async = False
'xmlFile.Load "file.xml"
xmlFile.LoadXML "<item modifiedMark='2'><field name='aa'>1.5485</field><field name='bbb'>56880986</field><field name='ccc'>10</field><field name='ddd'>fdsaf</field></item>"

If xmlFile.documentElement Is Nothing Then xmlFile.loadXML "<item/>"

Dim i As Integer
Dim strText as String
Set xmlElement = xmlFile.documentElement.selectNodes("item/field")
For i = 1 To xmlElement.length
   ……
   strText=xmlElement(i - 1).Text
   ……
Next i

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:234060次
    • 积分:2709
    • 等级:
    • 排名:第13288名
    • 原创:19篇
    • 转载:100篇
    • 译文:0篇
    • 评论:30条
    最新评论
    推荐链接