El caso es que estoy intentando subir un fichero pdf a un servidor pero no lo consigo, si lo hago con postman si puedo pero desde harbour no hay manera. No tengo muchos conocimiento de uso de este tipo de comunicación por lo que estoy buscando en el foro como se hace pero no encuentro nada.
Este es el codigo que utilizo:
...
cUrl := "url..."
cFile := "X:\PDFS\FICHERO.PDF"
xDoc := CreateObject( "MSXML2.DOMDocument" )
ohttp := CreateObject( "MSXML2.XMLHTTP" )
ohttp:Open( "POST" , cUrl, .f.)
oHttp:SetRequestHeader("Content-Type" , "multipart/form-data" )
oHttp:SetRequestHeader("file", cFile)
try
ohttp:Send( xJSon )
catch
Msginfo("Error en el envio del fichero)
RETURN NIL
end
cRespuesta := ohttp:responseText
...
Esto es lo que envio desde postman y que funciona
- Code: Select all Expand view
curl --location 'https://www.zohoapis.eu/crm/v5/Leads/594992000001640002/Attachments' \
--header 'Authorization: Zoho-oauthtoken 1e...' \
--form 'file=@"/X:/PdfS/ZOHO_PRE.PDF"'
Alguien me puede ayudar.
Gracias de nuevo