2011-02-10 2 views
0

Je ne sais pas le faire ....VB6 lire la réponse XML ensemble de données vb.net webservice

Je suis surfe sur le pas net..but du code de travail ....

J'ai cette réponse xml de vb.net webservice:

 <?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> 

Comment je reçois mon application VB6 pour lire le résultat de cette XML ???

+0

Avez-vous ajouté une référence au composant Microsoft MSXML à votre projet VB6? Et a-t-il été installé sur votre machine? – nybbler

+0

J'ai ajouté la référence ... j'utilise le code pour appeler le service web .net à partir d'ici: http://www.freevbcode.com/ShowCode.asp?ID=7611 cela fonctionne merveilleusement et maintenant je suis coincé au "extrait" le résultat du xml ... cause la réponse que je reçois en VB6 est en fait dans la chaîne de caractères ... n j'ai essayé plusieurs code pour vb6 pour lire xml normal ... ça fonctionne bien .. .mais pas .net dataset xml ... – rathu

Répondre

0

Il existe de nombreuses références de traitement XML en vb6. Ma préférence est suivie dans l'article suivant: http://www.xml.com/pub/a/2000/07/12/vbasic/vb_and_xml.html Il suggère de traiter le XML via XSLT.

Le moyen le plus basique est d'utiliser MSXML. Mais c'est beaucoup plus de travail par rapport à l'utilisation de XSLT

+0

mozillanerd: merci pour le lien ... je vais essayer d'étudier ça en premier – rathu