PowerSuder вызывает WebService с BasicAuthentication

Question

Я использую PB 11.5.1 (Classic) и хочу передать XML в WebService, который использует BasicAuth.

Я не могу найти способ реализации BasicAuth.

У меня естьискал форумы / блоги, но я не нашел четкого ответа, если это вообще возможно.

Любая помощь приветствуется

Answer 1

Возможно, вы можете использовать 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()