leo@lhsistemas.com

Bom dia.
Chame assim:
winexec("javaws.exe -jar d:\progs\esocial\EsocialSign.jar")
De preferência, mova-se para o diretório D:\PROGS\ESOCIAL e a partir daí execute o comando acima.

Bom dia.
No seu código que envia o email, deve-se ativar o TLS.

Kapi, boa tarde.
FiveWin 10.12
XHarbour 1.2.1 Simplex Rev.6717

Kapiaba, como fez então quando migrou sua aplicação para 32bits ?
Me ajuda aí por favor.
Abraços.

Theotokos, boa tarde.
 
Segue um exemplo abaixo:
 
   oFile := TTxtFile():New(cFileCMD)  // Arquivo TXT a ler
   
   Define Dialog oDlgWait RESOURCE "AGUARDA" of oWndExcel Title "Gerando Arquivo MS-Excel"

   nPercent := 0
   nLinhas  := oFile:LastRec()  // Pega a quantidade de linhas no arquivo TXT

   Redefine Progress oPercent ID 101 OF oDlgWait

   Activate Dialog oDlgWait Centered NoWait

   oPercent:SetRange( 1, nLinhas )

   oPercent:SetStep(1)

   oExcel:= TExcelScript():New()
   oExcel:Visible := .F.
   oExcel:Open( cDestino ) // abre o documento vazio que utilizo como modelo(template)

   Do While ! oFile:lEof()
       oPercent:SetPos( oFile:nRecno() )

       cLinhaTXT := Alltrim(oFile:cLine)  // Le a linha do arquivo TXT

      If ! Empty(cLinhaTXT)
         oExcel:Eval( cLinhaTXT )
      EndIf

      oFile:Skip( 1 )  // Salta uma linha no arquivo TXT(vai para a próxima linha)
   ENDDO

   oExcel:Save()
   oExcel:End(.T.)
   oFile:End()
 
É como trabalhar com arquivo DBF.
 
Abraços,
Léo.