PC Toledo

Da para usar assim

Local cUrl := "https://www.timeanddate.com/worldclock/fullscreen.html?n=45"
Try
oServer:= win_OleCreateObject( "MSXML2.ServerXMLHTTP.6.0")
Catch
MsgInfo('Erro na Criação do Serviço')
Return .f.
End
Try
oServer:Open( "GET", cUrl, .f. )
oServer:SetRequestHeader( "Content-Type ...

Você não pode tirar as aspas pois elas fazem parte do texto de procurar, se você olhar no arquivo de retorno tem as aspas

faz o teste com o prg que estou usando

Aqui esta funcionando

Ola tente assim


nIni := At('" window.rapidInstance = new window.YAHOO.i13n.Rapid(rapidConfig);', cHtml)
cHtml1:= SubStr( cHtml, nIni)

nIni := At('" data-reactid="30"><span', cHtml1) // coloque mais esta duas linhas
cHtml1:= SubStr( cHtml1, nIni)

nIni := At('D(ib)" data-reactid="31 ...

Ola
neste link você acha todos
https://www.vivaolinux.com.br/dica/Saud ... tiva-Linux

ola e so fazer assim
botão direito inspecionar elemento(Q)

Ola
voce tem o arquivo que esta enviando
normal sem compactar

Ola você esta usando a versão nova?
este teste e com a 1.0.4
https://github.com/muquit/mailsend-go/releases/download/v1.0.4/mailsend-go_1.0.4_windows-32bit.zip

mailsend-go -from email@uol.com.br -to destino@k.com.br -port 587 -smtp smtps.uol.com.br -sub "Assunto" auth -user email@uol.com.br ...

Ola tente assim
oServer:=CreateObject( "MSXML2.ServerXMLHTTP")
oServer:Open( "POST", 'https://hml-integration.yandeh.com.br/categories' , .f. )
oServer:setRequestHeader("Content-Type", "application/gzip; charset=utf-8;application/x-www-form-urlencoded")
oServer:setRequestHeader("accept ...

Rubens
O hbmk2 não foi feito para compilar as alterações nos arquivos fmg
Eu uso assim se altero um fmg.
Eu altero o prg q ele pertence, fica mais fácil

Agora o erro mudou, é o mesmo do SOAPUI

XML invalido para utilizacao neste webserver

O erro pode ser hb_eol() no final das linhas.
fazer um texto em uma linha só

cXmlEnvio := [<usuario>TESTES</usuario>]
cXmlEnvio += [<senha>BASE</senha>]
cXmlEnvio += [<codatm>11340073</codatm>]
cXmlEnvio ...

Ola exemplo:
cParm:= "__EVENTTARGET=" + ;
"&__EVENTARGUMENT=" + ;
"&__VIEWSTATE=" + Transfome(cviewState) + ;
"&__VIEWSTATEGENERATOR=" + Transfome(cViewStateGenerator) + ;
"&__EVENTVALIDATION=" + Transfome(cEeventValidation) + ;
"&ctl00%24txtPalavraChave=" + ;
"&ctl00%24ContentPlaceHolder1 ...

ola Rubens nesta ultima foi arrumado o erro

Ola Fladimir
Testar com esta mudança na função abaixo
com mais de um certificado

*****************************************
Function DownLoad()
Local cParm, cRet, cPart, cCertificado:= SubStr(principal.Combo_1.DisplayValue, (At(' - ', principal.Combo_1.DisplayValue) + 3))
Local cXML

nIni := At ...