Springen naar inhoud


- - - - -

Xml Databestand Lezen In Vb6


  • Log in a.u.b. om te beantwoorden
Geen reacties in dit onderwerp

#1 Marc Devlieger

Marc Devlieger

    Starting Developer

  • Leden
  • 13 berichten
    Laatst bezocht 05 mei 2015 17:51

Geplaatst op 01 mei 2015 - 10:15

... AANGEZIEN GEEN REACTIE VB6 FORMUM ... EFF PROBEREN HIER

Hoi ... ik probeer een XML database- bestand te lezen. Het lukt mij het bestand te openen en het eerste deel van het bestand te lezen :

Function Load_XML()

Dim sXMLFile As String
Dim oXML As New DOMDocument

sXMLFile = Form_03.LBL_ImportBestand.Caption
oXML.async = False
oXML.Load sXMLFile

If oXML.parseError.reason <> "" Then

MsgBox oXML.parseError.reason
Exit Function

End If





Dim objNodes As IXMLDOMNodeList
Dim objBookNode As IXMLDOMNode

Dim NodesValue


Set objNodes = oXML.selectNodes("//Export")

For Each objBookNode In objNodes

If objBookNode.selectNodes("Event").length <> 0 Then

NodesValue = objBookNode.selectSingleNode("Event").nodeTypedValue
Form_03.Text1 = Form_03.Text1 & NodesValue & vbNewLine


End If

Next objBookNode


End Function


Ik krijg enkel het eerste gedeelte 'EVENT' te zien.... wat is er fout ?


XML bestand (Deels)


<Export>




<Event ID="151463655">


<Event_ID>151463655</Event_ID>
<Start-Date>31/03/2015</Start-Date>
<Start-Time>11:03:54</Start-Time>
<End-Time>11:03:54</End-Time>

</Event>


<Event ID="151465395">


<Event_ID>151465395</Event_ID>
<Start-Date>31/03/2015</Start-Date>
<Start-Time>12:25:55</Start-Time>
<End-Time>12:25:55</End-Time>

</Event>




0 gebruiker(s) lezen dit onderwerp

0 lid(leden), 0 bezoeker(s), 0 anonieme gebruikers

Inloggen


Untitled 1

Met dank aan PascalBianca die tot op heden alles bijhoud sinds anno dec 2010)
Met dank aan J├╝rgen voor de jarenlange inzet van visualbasic.be (anno dec 2000)
Met dank aan Mike en Ronneke voor de jarenlange inzet van vbib.be (anno dec 2010)
vbib.be - vbnet.be - vbdotnet.be - visualbasic.be