[ASP] XMLHTTP.Send werkt niet*

Pagina: 1
Acties:

Acties:
  • 0 Henk 'm!

Anoniem: 121248

Topicstarter
Ik wil de beschikbaarheid van een domeinnaam controleren via een eigen webservice, alleen krijg ik steeds volgende fout

Microsoft VBScript runtime error '800a01fb'
An exception occurred: 'objXmlHTTP.send'
/includes/order_webtools_checkdomain.asp, line 21


dit is m'n code :

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Sub DoTest()
    
        set objXmlHTTP = Server.CreateObject("MSXML2.XMLHTTP")
        set objXmlDOM = Server.CreateObject("MSXML2.DOMDocument")
        
        Dim aNode 
        
        objXmlDom.Async = false
        objXmlHTTP.Open "GET", WebService & "domainname=" & domein, False
        objXmlHTTP.send ""
        
        bOk = objXmlDom.Load(objXmlHTTP.ResponseXML)
        If bOk Then     
            'Set aNode = objXmlDom.documentElement.selectSingleNode("Results/anyType/Output")
            Set aNode = objXmlDom.documentElement.selectSingleNode("result")
            result = aNode.Text 
            Set aNode = objXmlDom.documentElement.selectSingleNode("msg")
            TestResult = aNode.Text
            
            'Set DetailsNode = objXmlDom.documentElement.selectSingleNode("Results/anyType/Details/DomainDoctorCheckDetails")       
            
        Else
            TestResult = "Failed"
            result = objXmlHTTP.ResponseText
        End If
    
    End Sub


De webservice doet het perfect, domeinnaam komt correct door, alleen die objXmlHTTP.send "" krijg ik niet gefixed. Na redelijk wat google searches begin ik me stilaan radeloos te voelen... Kan iemand me hierbij helpen?

Acties:
  • 0 Henk 'm!

  • whoami
  • Registratie: December 2000
  • Laatst online: 15:23
Heb je al eens gedebugged ?
Heb je al eens gegoogled op die error-code ?
IIG heeft het iets met security te maken.

https://fgheysels.github.io/


Acties:
  • 0 Henk 'm!

Anoniem: 121248

Topicstarter
jep, maar zoals je ziet geeft dit niet zoveel resultaten in Google en

code:
1
set objXmlHTTP =Server.CreateObject("MSXML2.ServerXMLHTTP") 'for MSXML 3

of
code:
1
Set objXmlHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0") 'for MSXML 4


geeft geen enkele verandering. :(

Debuggen is asp-vbscript is euh...

[ Voor 13% gewijzigd door Anoniem: 121248 op 16-06-2006 18:45 ]


Acties:
  • 0 Henk 'm!

Anoniem: 121248

Topicstarter
Heb even de laatste XML parser (4) geinstalleerd op de server, createobject aangespast (Set objXmlHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0")) en alles werkt weer naar behoren.