Asp classic IIS6,VBS&;XMLHTTP:执行访问被拒绝

Asp classic IIS6,VBS&;XMLHTTP:执行访问被拒绝,asp-classic,vbscript,xmlhttprequest,directory-security,Asp Classic,Vbscript,Xmlhttprequest,Directory Security,我有一个VBS文件,它正在从我们的网站中提取XML。一旦完成,它将在本地服务器上运行 我遇到的问题是,当我在工作站上运行文件(在XP SP3上运行IIS6)时,我得到错误: “执行访问被拒绝:此虚拟目录不允许执行对象。” 我正在从桌面打开该文件,因此我知道有一个安全参数需要更改,以允许可执行文件访问XMLHTTP。我该如何解决这个问题 Function Get_XML(api_url) Dim objHTTP, RespText, TempRespText Set objHTTP

我有一个VBS文件,它正在从我们的网站中提取XML。一旦完成,它将在本地服务器上运行

我遇到的问题是,当我在工作站上运行文件(在XP SP3上运行IIS6)时,我得到错误:

“执行访问被拒绝:此虚拟目录不允许执行对象。”

我正在从桌面打开该文件,因此我知道有一个安全参数需要更改,以允许可执行文件访问XMLHTTP。我该如何解决这个问题

Function Get_XML(api_url)
    Dim objHTTP, RespText, TempRespText
    Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")

    objHTTP.open "Get", api_url, False
    objHTTP.setRequestHeader "Content-Type", "text/xml"
    objHTTP.send

    RespText = objHTTP.ResponseText

    'Get_XML = CreateObject("Microsoft.XMLDOM")
    'Get_XML.async = False
    'Get_XML.loadXML RespText

'For testing:
    Get_XML = RespText

    Set objHTTP = Nothing
End Function

我发现了问题。显然,我正在运行的VBScript版本不允许运行MSXML2.ServerXMLHTTP。不确定是实际版本还是安全更新。所以我改变了:

Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
致:

它运行得很好

Set objHTTP = CreateObject("Microsoft.XMLHTTP")