VB6 从 vb.net webservice 读取数据集 xml 响应答案

【问题标题】：VB6 to read dataset xml response from vb.net webserviceVB6 从 vb.net webservice 读取数据集 xml 响应
【发布时间】：2011-02-10 04:40:20
【问题描述】：

我不知道这样做......

我已经在网上冲浪了..但是没有任何代码工作....

我有这个来自 vb.net webservice 的 xml 响应：

      <?xml version="1.0" encoding="utf-8" ?> 
- <DataSet xmlns="http://Wtechwebservice.com.my/">
- <xs:schema id="NewDataSet" xmlns="" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
- <xs:element name="NewDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true">
- <xs:complexType>
- <xs:choice minOccurs="0" maxOccurs="unbounded">
- <xs:element name="Table">
+ <xs:complexType>
+ <xs:sequence>
  <xs:element name="MessageID" type="xs:int" minOccurs="0" /> 
  <xs:element name="MessageTitle" type="xs:string" minOccurs="0" /> 
  <xs:element name="MessageDesc" type="xs:string" minOccurs="0" /> 
  <xs:element name="StartDate" type="xs:dateTime" minOccurs="0" /> 
  <xs:element name="EndDate" type="xs:dateTime" minOccurs="0" /> 
  <xs:element name="Repeat" type="xs:int" minOccurs="0" /> 
  <xs:element name="Status" type="xs:string" minOccurs="0" /> 
  <xs:element name="DateCreated" type="xs:dateTime" minOccurs="0" /> 
  <xs:element name="LastUpdated" type="xs:dateTime" minOccurs="0" /> 
  <xs:element name="UpdatedBy" type="xs:string" minOccurs="0" /> 
  </xs:sequence>
  </xs:complexType>
  </xs:element>
  </xs:choice>
  </xs:complexType>
  </xs:element>
  </xs:schema>
- <diffgr:diffgram xmlns:msdata="urn:schemas-microsoft-com:xml-msdata" xmlns:diffgr="urn:schemas-microsoft-com:xml-diffgram-v1">
- <NewDataSet xmlns="">
- <Table diffgr:id="Table1" msdata:rowOrder="0">
  <MessageID>11</MessageID> 
  <MessageTitle>Happy New Year</MessageTitle> 
  <MessageDesc>New Year is the time to unfold new horizons & realize new dreams</MessageDesc> 
  <StartDate>2011-01-01T16:10:34.963+08:00</StartDate> 
  <EndDate>2011-01-01T16:10:34.963+08:00</EndDate> 
  <Repeat>1</Repeat> 
  <Status>Active</Status> 
  <DateCreated>2010-02-01T16:10:34.963+08:00</DateCreated> 
  <LastUpdated>2010-02-01T16:10:34.963+08:00</LastUpdated> 
  <UpdatedBy>Nosyi</UpdatedBy> 
  </Table>
  </NewDataSet>
  </diffgr:diffgram>
  </DataSet>

我如何让我的 VB6 应用程序从这个 XML 中读取结果？？？

【问题讨论】：

您是否在 VB6 项目中添加了对 Microsoft MSXML 组件的引用？它是否已安装在您的机器上？
我已经添加了参考...我使用代码从这里调用 .net Web 服务：freevbcode.com/ShowCode.asp?ID=7611 它工作得很好，现在我被困在“提取”结果从 xml...因为我在 VB6 中得到的响应实际上是字符串类型...n 我已经尝试了几个 vb6 的代码来读取正常的 xml...它工作正常...但不是 .net 数据集 xml ...

标签： xml vb.net vb6

【解决方案1】：

vb6中处理XML的参考文献很多。以下文章遵循我的偏好： http://www.xml.com/pub/a/2000/07/12/vbasic/vb_and_xml.html 它建议通过 XSLT 处理 XML。

最基本的方法是使用 MSXML。但与使用 XSLT 相比，这需要做更多的工作

【讨论】：

mozillanerd : 谢谢你的链接...我会先研究一下