Спасибо

/*

Тяну дату в датавинду
Строю .xml файл и наполняю его этой датой
зипаю .xml в .zip
читаю .zip в blob и перевожу в base64 encoded string
теперь это надо отослать
*/

string s_status_text, s_response_text, s_request_post, s_post_str
oleobject oXMLHttp
long l_status_code
int i_rc
string Boundary, user, password, s_file_content

/* не хочу светить юзера и пароль, могу в личку или на мыло */
user = ''
password = ''
/****************************************************************/

s_file_content = 'UEsDBBQAAAAIAMtO90Yr5/G ... base64 encoded string ... ztnFtv4zYWgN8L9D8QftinjUVSlu1MNW4dZzKTwE7ScabT'

oXMLHttp = CREATE oleobject
i_rc = oXMLHttp.ConnectToNewObject('MSXML2.XMLHTTP')

s_request_post = 'http://simon.optimaloutsource.com/portal/order/gm'

Boundary = "------------------------------f17fa1454ef0"

oXMLHttp.Open ("POST", s_request_post, False)

oXMLHttp.setRequestHeader ("Content-Type", "multipart/form-data; boundary=" + Boundary)
oXMLHttp.setRequestHeader ("Expect", "100-continue")
oXMLHttp.setRequestHeader ("Accept", "*/*")
oXMLHttp.setRequestHeader ("Pragma", "no cache")

s_post_str = &
Boundary + &
'~r~nContent-Disposition: form-data; name="user"~r~n' + user + '~r~n' + &
Boundary + &
'~r~nContent-Disposition: form-data; name="pass"~r~n' + password + '~r~n' + &
Boundary + &
'~r~nContent-Disposition: form-data; name="file"; filename="test.zip"~r~nContent-Type: application/octet-stream~r~n' + s_file_content + '~r~n' + &
Boundary + &
'--' // <- to end boundary extra 2

oXMLHttp.setRequestHeader ("Content-Length", len(s_post_str))

oXMLHttp.Send(s_post_str)

s_status_text = oXMLHttp.StatusText
l_status_code = oXMLHttp.Status
s_response_text = oXMLHttp.ResponseText

oXMLHttp.DisconnectObject()
DESTROY oXMLHttp

/************************************ получаю обратно***************************************************

{"message": "Missing or invalid username and/or password.", "code": 401, "description": "Unauthorized"}

Неправильный синтакс s_post_str и/или неправильный setRequestHeader() ????????????

Документация на call: */

// http://drive.google.com/file/d/0B9trqYBZ1pKNLS1HT1JtMkh4Zmc/view?pli=1
// http://drive.google.com/file/d/0B9trqYBZ1pKNbjdpbU5jQ0NseEE/view?pli=1

/*****************************************************************************************************/

спасибо