Ver Mensaje Individual
  #737  
Antiguo 01-06-2021
Band Band is offline
Miembro
 
Registrado: may 2021
Posts: 35
Reputación: 0
Band Va por buen camino
Cita:
Empezado por tejano Ver Mensaje
Buenos días Band, puedes enviar como te quedaría el curl?, yo también estoy intentando utilizarlo y más ahora que ese comando viene que el mismo Windows.
Cuando lo envío me da el error 400 de Bad Request.
Graciasssssss!!!!
hola tejano, yo lo hago así:

// Lleno variable de parámetros

Código Delphi [-]
curlCommand := '-d "@' + nombreArchivo + '" ' + // Archivo que voy a enviar
    ' --cert-type P12 --cert sello_entidad_act.p12:IZDesa2021 ' + //Certificado pruebas izenpe (usando sello entidad)
    ' -D "' + PATH_CURL + '\header-dump.txt" ' + //Fichero donde guardo el header de respuesta (es innecesario)
    ' -H "Content-Type: application/xml;charset=UTF-8" ' +  
    ' -H "Accept-Encoding: ''gzip''" ' +
    ' -H "Content-Encoding: ''gzip''" ' +   
    ' -X POST ' + URL_ALTA; //URL de alta guipuzkoa

// Uso de curl con shellexecute (función creada por un compañero mío, con la siguiente especificación)
//
Código Delphi [-]
ShellExecute(Operation:string;FileName:string;Parameters:string;Directory:string;ShowCmd:integer):Ca  rdinal
//No tengo el código fuente de esta función pero realmente lo interesante és el llenado de la variable curlCommand

Código Delphi [-]
ShellExecute(
    'open',
    'cmd',
    '/v:1 /c curl.exe ' + curlCommand +                                 
    ' > "' + pathRespuesta + '"', // Fichero xml donde guardo la respuesta
    PATH_CURL, // Path donde hay el curl.exe
    0
  );
Responder Con Cita