Thema Datum  Von Nutzer Rating
Antwort
05.08.2016 12:24:12 D. Klockner
NotSolved
05.08.2016 13:16:47 SJ
NotSolved
Rot Systemöffentliche Konstanten?
 05.08.2016 13:31:27 SJ
NotSolved
05.08.2016 15:13:01 Gast92963
NotSolved

Ansicht des Beitrags:
Von:
SJ		 Datum:
05.08.2016 13:31:27		 Views:
453		 Rating:
     
Antwort:
  Ja
Thema:
Systemöffentliche Konstanten?

Hallo,

als Beispiel noch ein Weg mit XML-Dokument:

XML:

<Konfiguration>
	<Wert1>1</Wert1>
	<Wert2>2</Wert2>
</Konfiguration>

Routine zum laden:

Option Explicit

Public Sub read_config()
    Dim objXML As Object
    Set objXML = CreateObject("Microsoft.XMLDOM")
    
    objXML.validateOnParse = True
    objXML.setProperty "SelectionLanguage", "XPath"
    
    If Not objXML.Load(Environ("USERPROFILE") & "\Desktop\werte.xml") Then
        MsgBox "Fehler beim Laden des Dokumentes." & vbCrLf & vbCrLf _
        & "Grund: " & objXML.parseError.reason & vbCrLf _
        & "Zeile: " & objXML.parseError.Line, vbOKOnly Or vbExclamation, "Fehler"
        Set objXML = Nothing
    End If
    
    Debug.Print objXML.SelectSingleNode("/Konfiguration/Wert1").Text
    Debug.Print objXML.SelectSingleNode("/Konfiguration/Wert2").Text
    
    Set objXML = Nothing
End Sub

Gruß

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
05.08.2016 12:24:12 D. Klockner
NotSolved
05.08.2016 13:16:47 SJ
NotSolved
Rot Systemöffentliche Konstanten?
 05.08.2016 13:31:27 SJ
NotSolved
05.08.2016 15:13:01 Gast92963
NotSolved