vB读取xml文件(急,请各位高手帮忙) - VB / 基础类
vb读取xml文件,大家好,我有一个xml文件
<?xml version="1.0" encoding="GB2312" ?>
<NewDataSet>
<WorkFlow>
<FlowName>测试流程1</FlowName>
<FlowGUID>441B264D</FlowGUID>
</WorkFlow>
<WorkFlow>
<FlowName>测试流程2</FlowName>
<FlowGUID>441B264E</FlowGUID>
</WorkFlow>
</NewDataSet>
<WorkFlow>
<FlowName>测试流程3</FlowName>
<FlowGUID>441B264C</FlowGUID>
</WorkFlow>
我用vB写一段代码要把每一个workflow里面的数据读出来,然后插入到数据库中,比如第一个flowname 我要读出测试流程
1,441B264D,第二个流程我要读出测试流程2,441B264E,然后我会用一个语句插入数据库,请问怎么用循环写?各位高手帮帮忙
搜索一下，网上有实例
这种例子网上太多
参考 http://topic.csdn.net/t/20040314/23/2842665.html
{{
相关问答：
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
现在我想根据treeview上每个节点的权限，没有权限的节点不能被选中，而且成灰色，怎么实现，在线等。。。
这个？。。。
貌似没法。
试试能不能改某些node的颜色，记录下上次的nodeclick里的node。
下次点击的如� ......
我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
功能说明:Java servlet 把XML数据压缩后发送到PB用户端,PB收到数据后解压出来.
传输要经过Base64编码.
问题是:能收到数据但是解压不出来.想请教大家或者有什么好的办法?
PB可以用"zlibwapi.DLL" 解压
......
