Как делают меня данные POST к удаленному URL в Классике ASP?

20
задан George Stocker 8 July 2015 в 12:51
поделиться

7 ответов

Я не уверен, почему все другие отправляют решения ASP.NET, когда Вы конкретно сказали использование ASP "классик".

Что-то вроде этого должно работать. Я не написал код; я нашел его в другом месте. Но MSXML2. Объект ServerXMLHTTP - то, что Вы хотите использовать, если Вы не хотите покупать что-то коммерческое.

function getHTML (strUrl)
    Set xmlHttp = Server.Createobject("MSXML2.ServerXMLHTTP")
    xmlHttp.Open "GET", strUrl, False
    xmlHttp.setRequestHeader "User-Agent", "asp httprequest"
    xmlHttp.setRequestHeader "content-type", "application/x-www-form-urlencoded"
    xmlHttp.Send
    getHTML = xmlHttp.responseText
    xmlHttp.abort()
    set xmlHttp = Nothing   
end function 

Вы, возможно, должны были бы добавить некоторый код обработки ошибок к этому для использования в продуктивной среде. Я полагаю, что объект бросает ошибки, если это получает 404 или ошибку из-за тайм-аута. Необходимо будет "захватить" их стиль ASP (фу) установкой On Error Resume Next перед.Send и затем исследовать объект ошибки ASP видеть, была ли проблема.

Удачи!

31
ответ дан 29 November 2019 в 23:48
поделиться

Большинство страниц действия формы принимает данные как POST.

Function postFormData(url, data)
    Dim xhr : Set xhr = Server.CreateObject("MSXML2.ServerXMLHTTP.3.0")
    xhr.open "POST", url, false
    xhr.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
    xhr.send Data
    If xhr.Status = 200 Then
       postFormData = xhr.ResponseText
    Else
        Err.Raise 1001, "postFormData", "Post to " & url & " failed with " & xhr.Status
    End If
End Function

При создании кодирования URL данных необходим на значениях данных. Начиная с Сервера ГАДЮК. Метод URLEncode только соединяет кодирование каналом, и не кодирование компонента Вас должен заменить / символы с %2F

Function URLEncodeComponent(value)
    URLEncodeComponent = Server.URLEncode(value)
    URLEncodeComponent = Replace(URLEncodeComponent, "/", "%2F")
End Function
5
ответ дан 29 November 2019 в 23:48
поделиться

Можно сделать это многими путь. С WebClient

 WebClient Client = new WebClient ();
 Client.DownloadFile("http://www.stackoverflow.com/myfile.html", "myfile.html");

Или можно поместить данные в поток для использования его в программе:

WebClient Client = new WebClient ();
Stream strm = Client.OpenRead ("http://www.stackoverflow.com/myfile.htm");

, Но я действительно предпочитаю использование HttpWebRequest:

HttpWebRequest objRequest = (HttpWebRequest)WebRequest.Create("http://www.stackoverflow.com/myfile.html");
StreamWriter myWriter = new StreamWriter(objRequest.GetRequestStream());

я предпочитаю второй, потому что у Вас может быть больше опции для POST/получать или для Cookie.

0
ответ дан 29 November 2019 в 23:48
поделиться

В .NET это - Система. Сеть. WebClient или Система. Сеть. HttpWebRequest.

Классик ASP имеет совершенно другой API - я не уверен, что Вы использовали бы вместо этого там.

[редактирование]
я подозреваю, что , если у классического asp есть кто-либо созданный в поддержке этого, это находится в объекте Сценариев, как так: CreateObject("Scripting.????")

2
ответ дан 29 November 2019 в 23:48
поделиться

Если Вы застреваете с классом ASP, можно сделать это с коммерческой библиотекой ASPHTTP здесь:

http://www.serverobjects.com/comp/asphttp3.htm

2
ответ дан 29 November 2019 в 23:48
поделиться

В ASP.NET это довольно просто:

HttpWebRequest r =
  (HttpWebRequest)WebRequest.Create("http://www.google.com");
r.Method = "POST";
using (Stream stream = myRequest.GetRequestStream()) {
    // Write data to stream
}
WebResponse resp = r.GetResponse();
// Do soemthing with the resp
0
ответ дан 29 November 2019 в 23:48
поделиться

Используйте класс, описанный здесь. Это - довольно хороший метод, и я использую все это время:

http://www.jigar.net/articles/viewhtmlcontent78.aspx

public class  RemotePost{
     private  System.Collections.Specialized.NameValueCollection Inputs 
     = new  System.Collections.Specialized.NameValueCollection() ;

    public string  Url  =  "" ;
    public string  Method  =  "post" ;
    public string  FormName  =  "form1" ;

    public void  Add( string  name, string value ){
        Inputs.Add(name, value ) ;
     }

     public void  Post(){
        System.Web.HttpContext.Current.Response.Clear() ;

         System.Web.HttpContext.Current.Response.Write( "<html><head>" ) ;

         System.Web.HttpContext.Current.Response.Write( string .Format( "</head><body onload=\"document.{0}.submit()\">" ,FormName)) ;

         System.Web.HttpContext.Current.Response.Write( string .Format( "<form name=\"{0}\" method=\"{1}\" action=\"{2}\" >" ,

        FormName,Method,Url)) ;
            for ( int  i = 0 ; i< Inputs.Keys.Count ; i++){
            System.Web.HttpContext.Current.Response.Write( string .Format( "<input name=\"{0}\" type=\"hidden\" value=\"{1}\">" ,Inputs.Keys[i],Inputs[Inputs.Keys[i]])) ;
         }
        System.Web.HttpContext.Current.Response.Write( "</form>" ) ;
         System.Web.HttpContext.Current.Response.Write( "</body></html>" ) ;
         System.Web.HttpContext.Current.Response.End() ;
     }
} 

Использование это как:

RemotePost myremotepost  =  new  RemotePost() ;
myremotepost.Url  =  "http://www.jigar.net/demo/HttpRequestDemoServer.aspx" ;
myremotepost.Add( "field1" , "Huckleberry" ) ;
myremotepost.Add( "field2" , "Finn" ) ;
myremotepost.Post() ; 
0
ответ дан 29 November 2019 в 23:48
поделиться
Другие вопросы по тегам:

Похожие вопросы: