开发工具：VB6.0
现有如下代码，请各路高手赐教！小弟不胜感激~~如有源码更好！
Private Sub Command1_Click()
Dim xmlStr As String
xmlStr = getXML
'请问如何把xmlStr转成一个xml文档?
End Sub
Public Function getXML() As String
Dim xml As String
xml = xml + " <?xml version='1.0' encoding='UTF-8'?>"
xml = xml + " <FREIGHTCPIC>"
xml = xml + " <HEADER>"
xml = xml + " <TYPE>IN </TYPE>"
xml = xml + " <WORKTYPE>0 </WORKTYPE>"
xml = xml + " <CLASSESTYPE>1 </CLASSESTYPE>"
xml = xml + " <LOGINUSERNAME>ayyt </LOGINUSERNAME>"
xml = xml + " <LOGINPASSWORD>ayyt </LOGINPASSWORD>"
xml = xml + " </HEADER>"
xml = xml + " </FREIGHTCPIC>"
getXML = xml
End Function
代开各行业【増直/鐠通】
如何对xml内容数据进行比较
例如：
<?xml version='1.0' encoding='utf-8'?>
<TestLIST>
<PID>40</PID>
<TestName>深圳市</TestName>
......
我在编写一个wince5.0的程序，想实现把PDA上的一个LIST <STRING>类型的数据序列化为XML，然后在PC上的一个webservice拿到这个XML，转化为Dataset，更新PC上的数据库，我想问怎么把XML传给webservice的呢？
......
