也许你可以用
oleobject
其中使用
MSXML.ServerXMLHTTP
:
// args: as_username, as_password, as_basicauthstring
oleobject lole_http
string ls_response
lole_http = create oleobject
lole_http.ConnectToNewObject("msxml2.ServerXMLHTTP")
lole_http.Open("POST", ls_theurl, FALSE, as_username, as_password)
lole_http.setTimeouts 5000, 5000, 10000, 10000 //ms - resolve, connect, send, receive
lole_http.setRequestHeader("Authorization", "Basic " + as_basicauthstring) // set your basic auth string here
lole_http.Send(xmlToSend)
ls_response = lole_http.responseText
lole_http.DisconnectObject()
