HTTP GET 请求、ASP - 我迷路了！

将 VBScript 与 ASP 结合使用，我尝试设置一个 HTTP GET 请求，该请求将访问一个页面，该页面又生成一行 ASCII（非 HTML）。然后，我想将 ASCII 行（包含由分号分隔的 4 个值）推断回原始 ASP 页面中的 4 个变量，以便我可以获取这些值并对其进行处理。

这是我想通过 HTTP GET 请求访问的页面http://www.certigo.com/demo/request.asp http://www.certigo.com/demo/request.asp。此处三个值均为空。

我对 ASP 不太了解，所以我有这个：

Dim oXMLHTTP

Dim strStatusTest

Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP.3.0")

oXMLHTTP.Open "GET", "http://www.certigo.com/demo/request.asp", False

oXMLHTTP.Send

If oXMLHTTP.Status = 200 Then

strStatusText = oXMLHTTP.responseBody

End If

但显然我不知道我在做什么，因为这根本不起作用。如果我得知我所拥有的一切没有朝着正确的方向发展，我一点也不感到惊讶。请帮忙！！

-Tracy

您的代码应如下所示：-

Function GetTextFromUrl(url)

  Dim oXMLHTTP
  Dim strStatusTest

  Set oXMLHTTP = CreateObject("MSXML2.ServerXMLHTTP.3.0")

  oXMLHTTP.Open "GET", url, False
  oXMLHTTP.Send

  If oXMLHTTP.Status = 200 Then

    GetTextFromUrl = oXMLHTTP.responseText

  End If

End Function

Dim sResult : sResult = GetTextFromUrl("http://www.certigo.com/demo/request.asp")

请注意，在 ASP 中使用 ServerXMLHTTP，XMLHTTP 组件是为客户端使用而设计的，在多线程环境（例如 ASP）中使用并不安全。