Boa tarde, emotta !!
Já tentei assim,
Tcrlf := chr(13)+chr(10)
Taux_API_Arg = '{'
Taux_API_Arg += '"path":"/codechain/extrato.pdf",'
Taux_API_Arg += '"mode":"add",'
Taux_API_Arg += '"autorename":true,'
Taux_API_Arg += '"mute":false'
Taux_API_Arg += '}'
Taux_Arquivo = "C:\Onedrive\fontes\ManagerDropbox\extrato.pdf"
Taux_Binario = hb_MemoRead(Taux_Arquivo)
Taux_Binario = hb_base64encode(Taux_Binario)
Taux_Binario = alltrim( CharRem( Tcrlf, Taux_Binario ) )
oHttp := CreateObject("MSXML2.ServerXMLHTTP.6.0")
oHttp:Open("POST", "https://content.dropboxapi.com/2/files/upload", .f.)
oHttp:setRequestHeader("Authorization","Bearer " + alltrim(Taux_Token) )
oHttp:setRequestHeader("Content-Type", "application/octet-stream")
oHttp:setRequestHeader("Dropbox-API-Arg", Taux_API_Arg )
oHttp:Send(Taux_Binario)
O arquivo vai corrompido.
Mas se eu faço pelo Postman, em body e escolho Binary, vai correto !!!
Tales