Microsoft VBScript runtime error '800a13ba'

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

HI there,

I am getting an error on my page which calls up a web service.

Microsoft VBScript runtime error '800a13ba'

Unknown runtime error: 'SearchQueryXML'

/SearchResults.asp, line 142


the code is as follows:


Dim oSOAP
Dim XmlDoc
Dim sSearchText

sSearchText = ""
sSearchText = "" & request.Form("search")

if sSearchText = "" Then
Response.Write("No search matches found.")
Else
'Create an object of Soap Client
Set oSOAP = Server.CreateObject("MSSOAP.SoapClient")
oSOAP.ClientProperty("ServerHTTPRequest") = True
'Initaialize the Web Service

oSOAP.mssoapinit("http://www.mywebsite.com.au/sitesearch/search.asmx?wsdl")
'oSOAP.mssoapinit("\\filer\home\user518\sitesearch\servicexml.xml")
'Invoke the Web Service
XmlDoc = oSOAP.SearchQueryXML("test")

set xmlDocument = Server.CreateObject("Microsoft.XMLDOM")
set xslDocument = Server.CreateObject("Microsoft.XMLDOM")

xmlDocument.loadxml(XmlDoc)
xslDocument.load("\\filer\home\user518\sitesearch\SearchResults.xsl")

Response.Write(xmlDocument.transformNode(xslDocument))
End If


not sure if this is permissions or what? any help appreciated.
 
Back
Top