//Appel de ma procédure d'affichage de mon service WEB
aff_prod()
SourceXML est une chaîne
//Chargement du contenu XML
SourceXML = fChargeTexte(aff_prod())
XMLDocument("DocXML2", aff_prod())
//Création du document XML
SI ErreurDétectée ALORS
Erreur("Le document n'est pas au format XML")
FIN
XMLPremier("DocXML2")
TANTQUE PAS XMLEnDehors("DocXML2") //Boucle pour l'affichage de mon contenue
de fichier XML
//Recherche de mes valeurs
XMLRecherche("DocXML2", "id_produit", XMLBalise)
SI XMLTrouve("DocXML2") ALORS
idproduit = XMLDonnée("DocXML2") FIN
XMLRecherche("DocXML2", "ref_produit", XMLBalise)
SI XMLTrouve("DocXML2") ALORS
refproduit= XMLDonnée("DocXML2")
FIN
XMLRecherche("DocXML2", "designation_produit", XMLBalise)
SI XMLTrouve("DocXML2") ALORS
Info(Table.designation_produit = XMLDonnée("DocXML2")) FIN
Affichage des données
Info("Numéro de commande : " + idproduit, "refproduit : " + ...
refproduit, "desingation produit : " + designationproduit)
XMLSuivant("DocXML2")
FIN
XMLtermine("DocXML")
Voici mon code pour faire la lecture d'un fichier XML que me renvoie un
procédure d'affichage stocké dans un service WEB dotnet développé en VB.net,
j'ai regarder dans l'aide de windev 7.5 et j'ai repris la procédure d'ecrite
pour réaliser un parcour de fichier et récupéer les valeurs id_produit,
ref_produit, designation_produit.
j'ai regarder dans les postes des newsgroup et je n'ais pas trouver
d'exemple ou de personne ayant eu le même problème
sinon je précise que je suis un débutant dans le développent d'application
sous windev, merci de votre tolérance :)
Mon problème :
il ne parcoure pas le fichier il ne m'affiche que les premières valeurs de
mon fichier (celle avec l'idée 0) quelqu'un peut-il me dire si il y une
erreur dans mon code Windev...
Merci
Ci-dessous mon fichier XML
------------------------------------
xmlns:xs="http://www.w3.org/2001/XMLSchema"
xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
msdata:UseCurrentLocale="true">
minOccurs="0" />
minOccurs="0" />
xmlns:diffgr="urn:schemas-microsoft-com:xml-diffgram-v1">
a88784589998
Serviette de bain
pouet
poutskjhskjhskjskjsh
Test
tezearezerazerazerazer