lzth.net
当前位置:首页 >> VB6, 操作XML文件,进行读取和替换 >>

VB6, 操作XML文件,进行读取和替换

都在附件里

给你两个方案 1,使用webbrower控件加载xml然后使用document对象的方法来获取

工程中引用Microsoft XML,啥版本都行,然后就可以用常见的方法操作xml文件了,比如: Dim xmldoc As New MSXML.DOMDocumentxmldoc.Load "xml文件的路径" '打开xml文件Print xmldoc.selectNodes("root/data")(0).Text '打印其中一个节点的内容

'xml文本中有 :xmlns="x-schema:pmillmt.xml" 串时对象没法读取Private Sub Command1_Click() Dim xmldoc As New MSXML2.DOMDocument xmldoc.async = False If xmldoc.Load(App.Path & "\test.xml") Then Dim list As IXMLDOMNodeList Set list...

既然是webservice,你就用VB6建立一个XML格式的(网页)文件,对方用IE就能打开,也可以使用XMLHTTP协议直接读取数据。

简单的改写不解决问题,VB.net有专门的xml类,建议你仔细研究

Private Sub Command1_Click() Open "1.xml" For Output As #1 Close #1 End Sub 注: 先生成 在 运行 会在exe的目录里 生成一个1.xml ,怎么样 方法不错吧 ,别的扩展名的也可以这样生成

这个不完美,我来补个完美的,并有超时设定,这样抓数据就灰常的可以等待,没有太快的超时了. Public Function getHtmlStr(strURL) On Error GoTo ErrorHandler Dim XmlHttp As Object Set XmlHttp = Nothing Set XmlHttp = CreateObject("msxml2.se...

xmlhttp不能上传文件。 可以使用asp的一些上传组件,你搜索一下。动网论坛有现成的。

Dim xmlhttp Set xmlhttp = CreateObject("msxml2.xmlhttp") With xmlhttp .open "POST", "填写上面假设的网址", False .setRequestHeader "Content-Type", "application/x-www-form-urlencoded" .send "MENU=200&code=1540&JOB=VOTE" MsgBox .r...

网站首页 | 网站地图
All rights reserved Powered by www.lzth.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com