Private Sub Form_Load()
Dim xml1 As New MSXML2.DOMDocument
xml1.loadXML "<book>aaaaaa</book>"
FileName = "books.xml"
On Error Resume Next
xml1.Load FileName
MsgBox Err.Description & Err.Number
MsgBox xml1.firstChild.nodeName
End If
End Sub
好像是load方法出错,但输出的错误编号为0,books.xml和应用程序在同一目录下面,请各位大侠指点一下。
FileName =app.path & "\books.xml"