CreateXMLFile

[aidy]

I am trying to load an XML document in a basic derived language the
supports COM. here is my code

Sub CreateXMLFile ()
Dim XMLDoc as Object
const FILEPATH as string = "C:\xml_log.xml"

sXML = "<testresults>" & sXML & "</testresults>"

Set XMLDoc = CreateObject("Microsoft.XMLDOM")
XMLDoc.async = False
XMLDoc.loadXML(sXML)
XMLDoc.save(FILEPATH)

End sub

This is what appears in variable sXML just before we assign the object
reference (formatted of course)

<testresults>
<test id=TESTID_10>
<teststatus>pass</teststatus>
<test id=TESTID_20>
<teststatus>fail</teststatus>
</testresults>

I have got two problems

1) Nothing appears in 'C:\xml_log.xml'
2) Also, I am unsure on how to add the XML declaration '<?xml
version="1.0"?>'

All help appreciated.

Cheers

Aidy

[Martin Honnen]

aidy wrote:

This is what appears in variable sXML just before we assign the object
reference (formatted of course)
That is not well-formed:
<testresults>
<test id=TESTID_10> ^^^^^^^^^
attribute values need to be quoted
<teststatus>pass</teststatus>

where is the closing </test> tag?
loadXML returns a boolean value indicating whether the markup was parsed
successfully or not.

--

Martin Honnen
http://JavaScript.FAQTs.com/

[aidy]

Martin,

Thanks for your help. It's working.

Aidy

[aidy]

Sorry. One more question. I can't seem to find a close method for the
DOM object

Set XMLDoc = CreateObject("Microsoft.XMLDOM")
XMLDoc.async = False
If XMLDoc.loadXML(sXML) = 0 then msgbox "XML not parsed"
XMLDoc.save(FILEPATH)

Is there one? How does the XML parser shut-down?

Aidy

[Martin Honnen]

aidy wrote:

I can't seem to find a close method for the
DOM object

Set XMLDoc = CreateObject("Microsoft.XMLDOM")
XMLDoc.async = False
If XMLDoc.loadXML(sXML) = 0 then msgbox "XML not parsed" Is there one? How does the XML parser shut-down?

There is no close method. If the parser finds an error that the markup
is not well-formed then parsing is stopped and the error is reported as e.g.
XMLDoc.parseError
with properties
XMLDoc.parseError.reason
see
<http://msdn.microsoft.com/library/default.asp?url=/library/en-us/xmlsdk/html/fdc6ff87-3cfb-4aa0-8bb6-d8c1acf9684e.asp>

If the above is VBScript then you would do e.g.
Set XMLDoc = Nothing
once you are done with the object and want to free it.
--

Martin Honnen
http://JavaScript.FAQTs.com/