Cita:
Empezado por TheRafa
Hola Buenos días...
Desde nuestra aplicativo, nos gustaría hacer el envío de un xml que ya hemos generado completamente utilizando el envío de VERIFACTU, aunque claro, la aplicación que ejecutáramos no tiene que ser visual, y que lo hiciéramos con un ShellExecute. Se ha generado o se puede generar algún ejecutable no visual que haga el envío?
Muchas gracias y un saludo.
|
Yo lo hago así (no es Delphi pero la idea se entiende):
Código Delphi
[-]ShellExecute( AMPAArra[1][1][2][1][1]:hWnd, Nil, C:\Desarrol\Treball\Utilitats\CURL\BIN\curl.exe, " -k --connect-timeout 60 -m 300 -s -S -L --header" + "Content-Type: text/xml;charset=UTF-8" +
" --cert C:\Particular\Ampa\Ampa32\firma_digital\79999999B_LUIS__R__B99999923_20241111.pem --key C:\Particular\Ampa\firma_digital\799999999B_LUIS__R__B99999923_20241111.pem
--data @C:\DESARROL\TREBALL\BD\BL\VERIFACTU\2025\VER-20251025-190839-455.xml https://prewww1.aeat.es/wlpl/TIKE-CO.../VerifactuSOAP -v
--output C:\DESARROL\TREBALL\BD\BL\VERIFACTU\2025\VER-20251025-190839-455.xml-Resposta_02.XML", Nil, If( lShowCMD, 1, 0 ) )
Es decir, con la instrucción ShellExecute() utilizo curl.exe para enviar en una sesión CMD, uno de los parámetros de ShellExecute() (el último en este caso), sirve para que se vea la ejecución de curl.exe o no.
Yo lo tengo en bucle con 'n' intentos, si la ejecucución falla, en la siguiente 'n' ejecución cambio el valor de lShowCMD y así veo por pantalla que está trabajando.