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)