b******g 发帖数: 7 | 1 I use MS DOM to parse a XML file in VB.
The program is very simple:
Private Sub cmdLoad_Click()
Dim xml As DOMDocument
Set xml = New DOMDocument
xml.Load(App.Path & "\sample.xml")
Dim root As IXMLDOMElement
Set root = xml.documentElement
Dim node As IXMLDOMNode
For Each node In root.childNodes
Debug.Print node.Text
Debug.Print node.nodeName
Debug.Print Chr(13) + Chr(10)
Next
End Sub
I can not get any output in Debug window.
But when I set a |
a*****a 发帖数: 438 | 2 Debug.Print is printing to debug window yah.. change to Response.Write
【在 b******g 的大作中提到】 : I use MS DOM to parse a XML file in VB. : The program is very simple: : Private Sub cmdLoad_Click() : Dim xml As DOMDocument : Set xml = New DOMDocument : xml.Load(App.Path & "\sample.xml") : Dim root As IXMLDOMElement : Set root = xml.documentElement : Dim node As IXMLDOMNode : For Each node In root.childNodes
|
b******g 发帖数: 7 | 3 I am using VB program to parse XML,
not ASP script...
【在 a*****a 的大作中提到】 : Debug.Print is printing to debug window yah.. change to Response.Write
|