wie zum extrahieren von Variablen-Namen und deren Werte aus der xml-Datei mit vbscript
Habe ich folgende xml-Datei & ich möchte zum extrahieren von Variablen-Namen & seines Wertes. können Sie bitte mir helfen, dieses zu erhalten getan.
Meine xml-format ist
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<configSections>
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="MyApps.Properties.Settings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
</sectionGroup>
</configSections>
<connectionStrings>
<add name="MyApps.Properties.Settings.dbConnString" connectionString="Data Source=MSTEST01\TQA;Initial Catalog=TQA;Persist Security Info=True;User ID=UserID;Password=Pwd"
providerName="System.Data.SqlClient" />
</connectionStrings>
<applicationSettings>
<MyApps.Properties.Settings>
<setting name="BasePath" serializeAs="String">
<value>\\Results</value>
</setting>
<setting name="cPath" serializeAs="String">
<value>C:\Controller</value>
</setting>
<setting name="ePath" serializeAs="String">
<value>C:\Debug\E.exe</value>
</setting>
<setting name="fPath" serializeAs="String">
<value>C:\Framework</value>
</setting>
<setting name="engineId" serializeAs="String">
<value>1</value>
</setting>
<setting name="wPath" serializeAs="String">
<value>C:\S5</value>
</setting>
</MyApps.Properties.Settings>
</applicationSettings>
</configuration>
und ich nehme an, dass die Ausgabe wie z.B. executablePath="D:\MyExe.exe"
Vielen Dank im Voraus
- die ersten 2 Punkte von die Antwort sollte Ihnen den Einstieg
- Reis-ich habe versucht folgenden code und in der Lage, um den erforderlichen Wert und Variablen aber stecken zu retreive connectionstring-variable und Ihr Wert Set xmlDoc = CreateObject("Microsoft.XMLDOM") xmlDoc.async = "False" xmlDoc.Laden ("C:\test\myxml.xml") strQuery = "/configuration/applicationSettings/MyApps.Eigenschaften.Einstellungen/*" Set colItem = xmlDoc.SelectNodes(strQuery) Für Jede objItem In colItem, Wenn objItem.Attribute.Länge > 0 then MsgBox objItem.Attribute(0).Text & ": "& objItem.Text End If Next
Du musst angemeldet sein, um einen Kommentar abzugeben.
Können Sie versuchen, den folgenden sowie. Nutzt getAttribute - Cscript vbs.
Schließlich fand ich meine Antwort, kann jemand Ihnen eine bessere option, wenn überhaupt? unten ist das Skript, das wrok für mich