| |
VB Skript (VBS)Wert aus XML-Datei in Variable lesen | | | Autor: ReneGade | Datum: 25.09.12 15:41 |
| Hallo,
folgendes kleines Problem:
Ich habe eine XML-Datei, die in einem Abschnitt wie folgt aussieht.
<RACKS>
<RACK barcode="075000242448">
<RACK_NAME>IPRIM1_M</RACK_NAME>
<RACK_TYPE>PL</RACK_TYPE>
<RACK_ORIGIN>MANUELL</RACK_ORIGIN>
<STATUS>OK</STATUS>
Ich will hier den Wert für <RACK_NAME> auslesen und in eine Variable speichern. Wie ich die Datei öffne, konnte ich dank einer Google-Suche herausfinden:
set xmlDoc = createobject("Microsoft.XMLDOM")
xmlDoc.async = "false"
xmlDoc.load(tmp_MotherPath) tmp_MotherPath ist natürlich der Pfad zur XML-Datei.
Aber wie geht es jetzt weiter? XMLDOM sollte dafür ja eine Funktion bereithalten, nur finde ich dazu keine Dokumentation irgendwo, bzw. nur recht komplexe Beispiele, die mir nicht so recht weiterhelfen. Wahrscheinlich ist das total trivial - kann mir da jmd weiterhelfen?
Danke im Vorraus,
ReneGade | |
Re: Wert aus XML-Datei in Variable lesen | | | Autor: ReneGade | Datum: 25.09.12 17:42 |
| Hallo,
habe jetzt doch noch ein verständliches Beispiel gefunden und konnte das lösen:
set xmlDoc = createobject("Microsoft.XMLDOM")
xmlDoc.async = "false"
xmlDoc.load(tmp_MotherPath)
If xmlLoaded = False Then
MsgBox "Datei konnte nicht geladen werden."
Else
RackName =xmldoc.selectSingleNode("TEST_PLAN/RACKS/RACK/RACK_NAME").text
End if Tatsächlich trivial... | |
Re: Wert aus XML-Datei in Variable lesen - neues Problem | | | Autor: ReneGade | Datum: 05.11.12 21:12 |
| Hallo,
ich hänge das jetzt mal hier dran.
Ich versuche jetzt, ein bestehendes xml-File durch zusätzliche Elemente bzw. Nodes zu ergänzen. Folgendermaßen sieht das im Moment aus:
'Use XMLDOM
set xmlDoc = createobject("Microsoft.XMLDOM")
'Open Source File for editing
xmlDoc.Async = "False"
xmlDoc.Load("C:\test.BLAS_VPAI")
set RACKS = xmlDoc.selectSingleNode("/TEST_PLAN/RACKS")
for i = 1 to NumOfDPplates
set NewRackNode = xmlDoc.createElement("RACK")
NewRackNode.setAttribute "barcode", "DPbarcode"&i
NewRackNode.setAttribute "action", "ins"
RACKS.appendChild(NewRackNode)
set NewRackNode = Nothing
next
'Save xml and exit xmlDoc
xmlDoc.Save("C:\test_new.BLAS_VPAI") "NumOfDPplates" ist hier einfach eine num. Variable, z.B. "6". Dieser Code erzeugt mir Folgendes:
<RACKS><RACK barcode="DPbarcode1" action="ins"/><RACK _
barcode="DPbarcode2" action="ins"/><RACK barcode="DPbarcode3" _
action="ins"/><RACK barcode="DPbarcode4" action="ins"/><RACK _
barcode="DPbarcode5" action="ins"/><RACK barcode="DPbarcode6" _
action="ins"/></RACKS> Sollte aber sein:
<RACKS>
<RACK barcode="DPbarcode1" action="ins"></RACK>
<RACK barcode="DPbarcode2" action="ins">></RACK>
<RACK barcode="DPbarcode3" action="ins">></RACK>
<RACK barcode="DPbarcode4" action="ins">></RACK>
<RACK barcode="DPbarcode5" action="ins">></RACK>
<RACK barcode="DPbarcode6" action="ins">></RACK>
</RACKS> Was mache ich falsch? Abseits der Formatierung, meine ich. | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
Neu! sevPopUp 2.0
Dynamische Kontextmenüs!
Erstellen Sie mit nur wenigen Zeilen Code Kontextmenüs dynamisch zur Laufzeit. Vordefinierte Styles (XP, Office, OfficeXP, Vista oder Windows 8) erleichtern die Anpassung an die eigenen Anwendung... Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|