Ver Mensaje Individual
  #4  
Antiguo 07-02-2025
batuzail batuzail is offline
Miembro
 
Registrado: feb 2017
Posts: 73
Reputación: 10
batuzail Va por buen camino
Hola,
Yo hago el envío así:

Código:
Dim Respuesta As New ChilkatHttpResponse
Dim http As New ChilkatHttp
Dim success As Long, strErr As String
   http.ClearHeaders
    http.setRequestHeader "Content-Type", "text/xml"
    success = http.SetSslClientCertPfx(GetRutaCertificado, GetPasswordCertificado)
    
    If (success = False) Then
        strErr = http.LastErrorText
    End If
    
    Set Respuesta = http.PText("POST", url, xml.GetXml, "utf-8", "application/xml; charset=utf-8", 0, 0)
Responder Con Cita