2009-12-11 39 views
8

在ASP中使用VBScript我想設置一個HTTP GET請求,它將訪問一個頁面,然後生成一行ASCII(非HTML)。然後我想推斷出那個ASCII分隔線,它將4個由分號分隔的值返回到我原來的ASP頁面中的4個變量中,以便我可以接受這些值並對它們做些什麼。HTTP GET請求,ASP - 我迷路了!

這是我想用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 

但顯然我還沒有線索我在做什麼,因爲這是行不通的。我完全不會感到驚訝,知道我在這裏有什麼不正確的方向。請幫忙!!

-Tracy

+1

您應該使用'MSXML2.ServerXMLHTTP' – 2009-12-11 01:25:38

回答

19

您的代碼應該是這樣的: -

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") 

注意使用的ServerXMLHTTP從內部ASP,XMLHTTP組件是專爲客戶端應用,而不是安全的在多線程環境中使用,如ASP。

+0

謝謝,這非常有幫助!我還有其餘的工作。我非常感謝你的幫助! – Tracy 2009-12-12 00:20:36