Как использовать MSXML2.ServerXMLHTTP для захвата данных с другого сайта?

У нас есть следующая ссылка:http://mvp.sos.state.ga.us/

вместо того, чтобы создавать БД для репликации информации, что страница MVP, мы хотели бы использовать нашу собственную форму, а затем за кулисами, отправить информацию на сайт выше, чтобы получить результаты с помощью компонента под названием MSXML2.Для serverxmlhttp.

к сожалению, я ничего не знаю об этом компоненте или о том, как его использовать.

кто-нибудь будет достаточно любезен, чтобы дать мне указания о том, как использовать собственный. .. чтобы отправить информацию на сайт выше и получить результаты обратно в нашу форму?

мы в основном пытаемся заставить пользователей ввести первый начальный, фамилия, округ, дата рождения.

спасибо

1 ответов


вы можете использовать этот компонент для http-запросов, таких как" POST"," GET"," DELETE " и т. д.

чтобы создать объект:

<%
    Set objXML = Server.CreateObject("MSXML2.ServerXMLHTTP")
%>

для отправки данных с помощью метода "GET":

<%
    objXML.Open "GET", "http://mvp.sos.state.ga.us/?some=querystring", false 
    objXML.Send ""
    Response.Write objXML.responseText
%>

обратите внимание, что открытый метод имеет 3 параметра: метод HTTP, URL, асинхронный вызов.

обратите внимание, что метод Send в " GET " игнорирует его параметр. (В данном случае мы передаем параметры через URL-адрес.)

в отправить данные с помощью метода "POST":

<%
    objXML.Open "POST", "http://mvp.sos.state.ga.us/", false 
    objXML.Send "username=htbasaran&password=somepassword"
    Response.Write objXML.responseText
%>

Примечание Для "POST", что метод отправки передает параметры в формате пар ключ-значение, как:key1=value1 & key2=value2&so=on... или любые другие данные, такие как XML, JSON и т. д.)

это основы этого компонента. Если вам нужна дополнительная информация, вы можете проверить Майкрософт "документы" страницы выход.

пример кода для получения значений формы и отправки их с помощью xmlhttp post метод.

<%
    ' getting form values
    my_uname = Request.Form("username")
    my_pword = Request.Form("password")

    ' creating object
    Set objXML = Server.CreateObject("MSXML2.ServerXMLHTTP")

    ' sending variables to an external site
    objXML.Open "POST", "http://www.sitename.com/login.asp", false
    objXML.Send "username=" & my_uname & "&password=" & my_pword

    ' Assuming that successful login will return response "Ok"
    ' writing the result to the client.
    if objXML.responseText="Ok" then
        Response.Write "Login Successful!"
    else
        Response.Write "Login Failed!"
    end if
%>