Como enviar dados para Api via PUT - webservice

[ANDRIL]

Preciso me comunicar com o webservice através do método PUT enviando dados no Body.
Crio o servidor assim

Código: Selecionar todos

oServer := win_OleCreateObject( "MSXML2.ServerXMLHTTP" )
oServer:Open( "PUT", cURL, .F. )
oServer:SetRequestHeader( "Content-Type","application/json")
oServer:Send( " " )
cRetorno := oServer:ResponseBody()

No caso como enviar dados no Body para o Server?

[rochinha]

Amiguinhos,

Envie o conteúdo que deseja pelo método send

Código: Selecionar todos

...
cVariavel := "Aqui tem um texto a ser enviado"

oServer:Send( cVariavel )
...