使用vbscript和asp,我试图建立一个http get请求,该请求将访问一个页面,该页面将生成一行ascii(非html)。然后,我想在我原来的asp页面中将ascii行的4个值用分号分隔成4个变量,这样我就可以获取这些值并对它们进行处理。
这是我想用http get请求访问的页面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

但显然我不知道我在做什么,因为这根本不起作用。如果我知道我现在所拥有的并不是朝着正确的方向发展,我将完全不感到惊讶。请帮忙!啊!
-特蕾西

最佳答案

你的代码应该是这样的:

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)中使用是不安全的。

07-28 11:00