Yêu cầu GET HTTP, ASP - Tôi bị mất!

Question

Sử dụng VBScript với ASP Tôi đang cố gắng thiết lập một Yêu cầu GET HTTP sẽ truy cập vào một trang mà lần lượt tạo ra một dòng mã ASCII (không phải HTML). Sau đó tôi muốn ngoại suy rằng dòng ASCII sẽ có 4 giá trị được phân tách bằng dấu chấm phẩy trở lại thành 4 biến trong trang ASP ban đầu của tôi để tôi có thể lấy các giá trị đó và làm điều gì đó với chúng.

Đây là trang tôi muốn truy cập bằng Yêu cầu GET HTTP http://www.certigo.com/demo/request.asp. Ba trong số các giá trị là null ở đây.

Tôi không biết nhiều/bất cứ điều gì về ASP, vì vậy tôi có điều này:

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 

nhưng rõ ràng là tôi không có một đầu mối những gì tôi đang làm vì điều này không làm việc ở tất cả. Tôi sẽ hoàn toàn không ngạc nhiên khi biết rằng những gì tôi có ở đây không đi đúng hướng. Hãy giúp tôi!!

-Tracy

Answer 1

Mã của bạn sẽ trông như thế này: - ServerXMLHTTP sử dụng

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

Lưu ý từ bên trong ASP, thành phần XMLHTTP được thiết kế để sử dụng phía khách hàng và không an toàn để sử dụng trong môi trường đa luồng như ASP.

Answer 2

Hãy thử thay đổi oXMLHTTP.responseBody-oXMLHTTP.responseText và xem nếu mà làm việc.

Hãy tham khảo trang web này nếu bạn cần một số chi tiết thông tin về kỹ thuật này:

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