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
InformationsquelleAutor Shree | 2012-04-04
Schreibe einen Kommentar