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

Question

使用VBScript和ASP，我试图建立一个HTTP GET请求，它将访问一个页面，而该页面又生成一行ASCII码(非HTML)。然后，我想推断出ASCII行，它将有4个由分号分隔的值返回到我的原始ASP页面中的4个变量中，这样我就可以获得这些值并对它们做一些事情。

这是我想用HTTP GET Request 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

Answer 1

你的代码应该是这样的：

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组件是为客户端使用而设计的，在多线程环境中使用是不安全的。

Answer 2

尝试将oXMLHTTP.responseBody更改为oXMLHTTP.responseText，看看是否有效。

如果您需要有关此技术的更多信息，请参阅此网页：

http://classicasp.aspfaq.com/general/how-do-i-read-the-contents-of-a-remote-web-page.html。