1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic

Lire un xml avec vbs

Signaler
Messages postés
23
Date d'inscription
lundi 20 décembre 2004
Statut
Membre
Dernière intervention
22 février 2005
 -
Messages postés
216
Date d'inscription
mardi 15 juin 2004
Statut
Membre
Dernière intervention
26 février 2006
 -
Bonjour,

J'ai de gros probleme pour recuperer les données dans un fichier xml.
Voila mon code :

Option Explicit


Dim xmlDoc : Set xmlDoc = CreateObject("Microsoft.XMLDOM")


If xmlDoc.load("C:\Projet\P_Backup\FichierDefinition.xml") Then
WScript.Echo "Le document a été chargé avec succès."
wscript.Echo "xmlDoc.attributes = " & xmlDoc.nodename
Dim x
For x 0 To x xmlDoc.nodeType

WScript.Echo xmlDoc.nodeName

next

Else
WScript.Echo "Impossible de charger le document"

End If

Mon fichier XML :

<?xml version="1.0" encoding="ISO-8859-1"?>
<Sauvegarde>
<Source>C:\W1\</Source>
<Cible>C:\TEST\</Cible>
<Option>True</Option>
</Sauvegarde>

Elpiojo
Afficher la suite

3 réponses

Réponse 1 / 3
Messages postés
216
Date d'inscription
mardi 15 juin 2004
Statut
Membre
Dernière intervention
26 février 2006
 1
Tu peux pas utiliser :
Set xmlDoc = new Microsoft.XMLDOM
au lieu de :
Set xmlDoc = CreateObject("Microsoft.XMLDOM")

quand a : For x 0 To x xmlDoc.nodeType
tu devrait pas plutot écrire :
For x = 0 To xmlDoc.nodeType


Réponse 2 / 3
Messages postés
23
Date d'inscription
lundi 20 décembre 2004
Statut
Membre
Dernière intervention
22 février 2005
ok merci, je ne vais pas te demander de faire mon programme, si tu connais un doc traitant de vbs & xml de preference en français. Je sais qu'il n'y a pas grand chose en francais mais j'aurais esayé!
Encore merci, tu m'as permis de debloquer le debut de mon code.

Elpiojo
Réponse 3 / 3
Messages postés
216
Date d'inscription
mardi 15 juin 2004
Statut
Membre
Dernière intervention
26 février 2006
 1
alors là... le xml est obscur pour moi... mais je vais chercher de la doc, ça m'interraisserait de pouvroir lire les xml.


Posez votre question