XmlDom not an object?

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   I am trying to get the below script to work but keep getting and error about the "Set xmlDoc = WScript.CreateObject("Microsoft.XMLDOM") " being "Not an object reference".  What does this mean and how can I correct it?

-Thanks

Sub Main()
'xmltest.vbs
'This script loads an XML document from a file, sends the document to the XML Processor,
'and displays the XML response.

'Address of XML Processor
url = "http://localhost/test/test.asp"

'Path to input document
docpath = "c:\test.xml"

'Path for output document
responsepath = "c:\response.xml"

'Get instance of XMLDOM
Set xmlDoc = WScript.CreateObject("Microsoft.XMLDOM")
xmlDoc.async="false"

'Load the XML request document
xmlDoc.Load(docpath)

'Create XMLHTTP object
Set xmlhttp = WScript.CreateObject("Microsoft.XMLHTTP")

'Send the request
'WScript.Echo "Sending XMLDoc "
xmlhttp.Open "POST", url, False
xmlhttp.Send xmlDoc

'Capture the response
Set returndoc = WScript.CreateObject("Microsoft.XMLDOM")
returndoc.async = "false"
returndoc.loadxml(xmlhttp.responseText)

'Save returned XML document as a file
returndoc.Save(responsepath)

End Sub

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
rsine Members Profile Find Members Posts Groupie Joined: May 18 2007 Status: Offline Points: 72	Post Options Post Reply Quote rsine Report Post Thanks(0) Quote Reply Topic: XmlDom not an object? Posted: November 05 2008 at 3:49am
	I am trying to get the below script to work but keep getting and error about the "Set xmlDoc = WScript.CreateObject("Microsoft.XMLDOM") " being "Not an object reference". What does this mean and how can I correct it? -Thanks Sub Main() 'xmltest.vbs 'This script loads an XML document from a file, sends the document to the XML Processor, 'and displays the XML response. 'Address of XML Processor url = "http://localhost/test/test.asp" 'Path to input document docpath = "c:\test.xml" 'Path for output document responsepath = "c:\response.xml" 'Get instance of XMLDOM Set xmlDoc = WScript.CreateObject("Microsoft.XMLDOM") xmlDoc.async="false" 'Load the XML request document xmlDoc.Load(docpath) 'Create XMLHTTP object Set xmlhttp = WScript.CreateObject("Microsoft.XMLHTTP") 'Send the request 'WScript.Echo "Sending XMLDoc " xmlhttp.Open "POST", url, False xmlhttp.Send xmlDoc 'Capture the response Set returndoc = WScript.CreateObject("Microsoft.XMLDOM") returndoc.async = "false" returndoc.loadxml(xmlhttp.responseText) 'Save returned XML document as a file returndoc.Save(responsepath) End Sub

rsine Members Profile Find Members Posts Groupie Joined: May 18 2007 Status: Offline Points: 72	Post Options Post Reply Quote rsine Report Post Thanks(0) Quote Reply Posted: November 05 2008 at 4:44am
	I figured out my issue was with the "WScript.". I removed that and all worked or so I thought. When I run my script all works but when I call it from Pick, I get the following error: (0xc00ce556) System Error: -1072896682 Error Source Line Sub Main_2() Chain "Test.atsc" End Sub Thoughts on what would be causing this and how I can correct?

rsine Members Profile Find Members Posts Groupie Joined: May 18 2007 Status: Offline Points: 72	Post Options Post Reply Quote rsine Report Post Thanks(0) Quote Reply Posted: November 05 2008 at 8:09am
	After some hair pulling, I simply shutdown Accuterm and re-entered. This solved the issue. Not sure why that worked but I haven't seen the error any more. -Thanks