Bonjour,
J'ai remarqué qu'il existe des références XML dans VB.
On ne voit voit aucun icone s'ajouter dans la boite à outils
Comment mettre en oeuvre pour traiter un fichier XML
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Fred
Dans le message:%23J0F$, RENAUD Eric écrit:
Bonjour,
Bonjour,
J'ai remarqué qu'il existe des références XML dans VB. On ne voit voit aucun icone s'ajouter dans la boite à outils Comment mettre en oeuvre pour traiter un fichier XML
Les références XML ne correspondent pas à des contrôles que l'on peut mettre dans la boîte à outils. Par contre, en ajoutant ces références au projet, on peut déclarer des objets XML.
Un petit extrait :
Dim xmlConfig As New MSXML2.DOMDocument30 Dim xmlMachines As MSXML2.IXMLDOMNodeList Dim xmlMachine As MSXML2.IXMLDOMElement Dim xmlCom As MSXML2.IXMLDOMElement Dim xmlPhoto As MSXML2.IXMLDOMElement Dim xmlRepProg As MSXML2.IXMLDOMElement Dim xmlOptions As MSXML2.IXMLDOMElement
Set xmlConfig = New MSXML2.DOMDocument30 xmlConfig.Load (App.Path & "config.xml") Set xmlMachines = xmlConfig.documentElement.getElementsByTagName("machine") Set xmlOptions = xmlConfig.documentElement.getElementsByTagName("options").Item(0) Set xmlRepProg = xmlOptions.getElementsByTagName("repprog").Item(0) Me.RépertoireProgrammes = xmlRepProg.getAttribute("chemin") For Each xmlMachine In xmlMachines Set xmlCom = xmlMachine.getElementsByTagName("com").Item(0) Set xmlPhoto = xmlMachine.getElementsByTagName("photo").Item(0) Set xmlRepProg = xmlMachine.getElementsByTagName("repprog").Item(0)
Dans le message:%23J0F$XJ1FHA.3864@TK2MSFTNGP12.phx.gbl,
RENAUD Eric écrit:
Bonjour,
Bonjour,
J'ai remarqué qu'il existe des références XML dans VB.
On ne voit voit aucun icone s'ajouter dans la boite à outils
Comment mettre en oeuvre pour traiter un fichier XML
Les références XML ne correspondent pas à des contrôles que l'on peut
mettre dans la boîte à outils.
Par contre, en ajoutant ces références au projet, on peut déclarer des
objets XML.
Un petit extrait :
Dim xmlConfig As New MSXML2.DOMDocument30
Dim xmlMachines As MSXML2.IXMLDOMNodeList
Dim xmlMachine As MSXML2.IXMLDOMElement
Dim xmlCom As MSXML2.IXMLDOMElement
Dim xmlPhoto As MSXML2.IXMLDOMElement
Dim xmlRepProg As MSXML2.IXMLDOMElement
Dim xmlOptions As MSXML2.IXMLDOMElement
Set xmlConfig = New MSXML2.DOMDocument30
xmlConfig.Load (App.Path & "config.xml")
Set xmlMachines =
xmlConfig.documentElement.getElementsByTagName("machine")
Set xmlOptions =
xmlConfig.documentElement.getElementsByTagName("options").Item(0)
Set xmlRepProg = xmlOptions.getElementsByTagName("repprog").Item(0)
Me.RépertoireProgrammes = xmlRepProg.getAttribute("chemin")
For Each xmlMachine In xmlMachines
Set xmlCom = xmlMachine.getElementsByTagName("com").Item(0)
Set xmlPhoto = xmlMachine.getElementsByTagName("photo").Item(0)
Set xmlRepProg =
xmlMachine.getElementsByTagName("repprog").Item(0)
J'ai remarqué qu'il existe des références XML dans VB. On ne voit voit aucun icone s'ajouter dans la boite à outils Comment mettre en oeuvre pour traiter un fichier XML
Les références XML ne correspondent pas à des contrôles que l'on peut mettre dans la boîte à outils. Par contre, en ajoutant ces références au projet, on peut déclarer des objets XML.
Un petit extrait :
Dim xmlConfig As New MSXML2.DOMDocument30 Dim xmlMachines As MSXML2.IXMLDOMNodeList Dim xmlMachine As MSXML2.IXMLDOMElement Dim xmlCom As MSXML2.IXMLDOMElement Dim xmlPhoto As MSXML2.IXMLDOMElement Dim xmlRepProg As MSXML2.IXMLDOMElement Dim xmlOptions As MSXML2.IXMLDOMElement
Set xmlConfig = New MSXML2.DOMDocument30 xmlConfig.Load (App.Path & "config.xml") Set xmlMachines = xmlConfig.documentElement.getElementsByTagName("machine") Set xmlOptions = xmlConfig.documentElement.getElementsByTagName("options").Item(0) Set xmlRepProg = xmlOptions.getElementsByTagName("repprog").Item(0) Me.RépertoireProgrammes = xmlRepProg.getAttribute("chemin") For Each xmlMachine In xmlMachines Set xmlCom = xmlMachine.getElementsByTagName("com").Item(0) Set xmlPhoto = xmlMachine.getElementsByTagName("photo").Item(0) Set xmlRepProg = xmlMachine.getElementsByTagName("repprog").Item(0)
Dans le message:%23J0F$, RENAUD Eric écrit: > Bonjour,
Bonjour,
> J'ai remarqué qu'il existe des références XML dans VB. > On ne voit voit aucun icone s'ajouter dans la boite à outils > Comment mettre en oeuvre pour traiter un fichier XML
Les références XML ne correspondent pas à des contrôles que l'on peut mettre dans la boîte à outils. Par contre, en ajoutant ces références au projet, on peut déclarer des objets XML.
Un petit extrait :
Dim xmlConfig As New MSXML2.DOMDocument30 Dim xmlMachines As MSXML2.IXMLDOMNodeList Dim xmlMachine As MSXML2.IXMLDOMElement Dim xmlCom As MSXML2.IXMLDOMElement Dim xmlPhoto As MSXML2.IXMLDOMElement Dim xmlRepProg As MSXML2.IXMLDOMElement Dim xmlOptions As MSXML2.IXMLDOMElement
Set xmlConfig = New MSXML2.DOMDocument30 xmlConfig.Load (App.Path & "config.xml") Set xmlMachines = xmlConfig.documentElement.getElementsByTagName("machine") Set xmlOptions = xmlConfig.documentElement.getElementsByTagName("options").Item(0) Set xmlRepProg = xmlOptions.getElementsByTagName("repprog").Item(0) Me.RépertoireProgrammes = xmlRepProg.getAttribute("chemin") For Each xmlMachine In xmlMachines Set xmlCom = xmlMachine.getElementsByTagName("com").Item(0) Set xmlPhoto = xmlMachine.getElementsByTagName("photo").Item(0) Set xmlRepProg = xmlMachine.getElementsByTagName("repprog").Item(0)
Dans le message:%23J0F$XJ1FHA.3864@TK2MSFTNGP12.phx.gbl,
RENAUD Eric écrit:
> Bonjour,
Bonjour,
> J'ai remarqué qu'il existe des références XML dans VB.
> On ne voit voit aucun icone s'ajouter dans la boite à outils
> Comment mettre en oeuvre pour traiter un fichier XML
Les références XML ne correspondent pas à des contrôles que l'on peut
mettre dans la boîte à outils.
Par contre, en ajoutant ces références au projet, on peut déclarer des
objets XML.
Un petit extrait :
Dim xmlConfig As New MSXML2.DOMDocument30
Dim xmlMachines As MSXML2.IXMLDOMNodeList
Dim xmlMachine As MSXML2.IXMLDOMElement
Dim xmlCom As MSXML2.IXMLDOMElement
Dim xmlPhoto As MSXML2.IXMLDOMElement
Dim xmlRepProg As MSXML2.IXMLDOMElement
Dim xmlOptions As MSXML2.IXMLDOMElement
Set xmlConfig = New MSXML2.DOMDocument30
xmlConfig.Load (App.Path & "config.xml")
Set xmlMachines =
xmlConfig.documentElement.getElementsByTagName("machine")
Set xmlOptions =
xmlConfig.documentElement.getElementsByTagName("options").Item(0)
Set xmlRepProg = xmlOptions.getElementsByTagName("repprog").Item(0)
Me.RépertoireProgrammes = xmlRepProg.getAttribute("chemin")
For Each xmlMachine In xmlMachines
Set xmlCom = xmlMachine.getElementsByTagName("com").Item(0)
Set xmlPhoto = xmlMachine.getElementsByTagName("photo").Item(0)
Set xmlRepProg =
xmlMachine.getElementsByTagName("repprog").Item(0)
Dans le message:%23J0F$, RENAUD Eric écrit: > Bonjour,
Bonjour,
> J'ai remarqué qu'il existe des références XML dans VB. > On ne voit voit aucun icone s'ajouter dans la boite à outils > Comment mettre en oeuvre pour traiter un fichier XML
Les références XML ne correspondent pas à des contrôles que l'on peut mettre dans la boîte à outils. Par contre, en ajoutant ces références au projet, on peut déclarer des objets XML.
Un petit extrait :
Dim xmlConfig As New MSXML2.DOMDocument30 Dim xmlMachines As MSXML2.IXMLDOMNodeList Dim xmlMachine As MSXML2.IXMLDOMElement Dim xmlCom As MSXML2.IXMLDOMElement Dim xmlPhoto As MSXML2.IXMLDOMElement Dim xmlRepProg As MSXML2.IXMLDOMElement Dim xmlOptions As MSXML2.IXMLDOMElement
Set xmlConfig = New MSXML2.DOMDocument30 xmlConfig.Load (App.Path & "config.xml") Set xmlMachines = xmlConfig.documentElement.getElementsByTagName("machine") Set xmlOptions = xmlConfig.documentElement.getElementsByTagName("options").Item(0) Set xmlRepProg = xmlOptions.getElementsByTagName("repprog").Item(0) Me.RépertoireProgrammes = xmlRepProg.getAttribute("chemin") For Each xmlMachine In xmlMachines Set xmlCom = xmlMachine.getElementsByTagName("com").Item(0) Set xmlPhoto = xmlMachine.getElementsByTagName("photo").Item(0) Set xmlRepProg = xmlMachine.getElementsByTagName("repprog").Item(0)
