CertPago en base 64

[Alex Noria]

Hola a todos :

Aquí podemos descargar el comprobante electrónico del SPEI :

http://www.banxico.org.mx/cep/

En el XML se encuentra el atributo numeroCertificado y se refiere al número de serie del certificado que generó el sello.
Aquí la pregunta :

¿ Debemos descargar este certificado y posteriormente generar el mismo en base 64 y pegarlo al complemento ?

¿ Ustedes como lo están manejando ?

Saludos

[Jesus Castelo]

http://validacfd.com/phpbb3/viewtopic.p ... 727#p41727

[Alex Noria]

Gracias Jesús Castelo :

¿ Entonces no hay forma de automatizar esto ?

Saludos

[Jesus Castelo]

Nunca me he dado a la tarea de recuperar los certificados de forma automática desde el portal del SAT pero creo que sí se puede, el problema es el captcha, que hasta donde mis casi nulos conocimientos sobre el tema me permiten saber, creo que debes descargar la imagen y mostrarla en tu aplicación para que capturen el valor y así enviarlo a la pagina del SAT como parámetro, algo así jaja. Y ya descargado pues el resto es pan comido. Seria casi casi automático.

http://www.sat.gob.mx/informacion_fisca ... t_web.aspx

[Alex Noria]

Gracias por la información.

El problema que le veo es que es muy susceptible a errores por parte del usuario. Ojalá hubiese alguna forma que en un solo paso se obtuvieran todos los datos, o debiera hacer un cambio el banco de México para que en ese XML estuviera el certificado en base 64.

Saludos

[Jesus Castelo]

debiera hacer un cambio el banco de México para que en ese XML estuviera el certificado en base 64.

de acuerdo, que venga así como esta en los CFDI. O también que el SAT acepte el puro numero y ya

[jocebaf]

Buen dia
Yo ocupo este codigo para descargar el certificado
grabarlo en un archivo .vbs y ejecutarlo

Código: Seleccionar todo

Dim DownloadDest
Dim LocalFile 
public certificado
dim strURL 
certificado="00001000000303350259"
Descarga()


function Descarga()
DownloadDest= "https://rdc.sat.gob.mx/rccf/"&mid(certificado,1,6)&"/"&mid(certificado,7,6)&"/" &mid(certificado,13,2)&"/" &mid(certificado,15,2)&"/"&mid(certificado,17,2)&"/"&certificado&".cer"
LocalFile= "c:\sistemas\DiscoDuroF\"&certificado&".cer"
'=====Cambiarle esta ruta y poner la nuestra
dim xmlhttp
  set xmlhttp=createobject("MSXML2.XMLHTTP.3.0")
  strURL = DownloadDest
  xmlhttp.Open "GET", strURL, false  
  xmlhttp.Send
  If xmlhttp.Status = 200 Then
    Dim objStream
    set objStream = CreateObject("ADODB.Stream")
    objStream.Type = 1 'adTypeBinary
    objStream.Open
    objStream.Write xmlhttp.responseBody
    objStream.SaveToFile LocalFile
    objStream.Close
    set objStream = Nothing
  End If
  set xmlhttp=Nothing
end function

[Alex Noria]

Gracias por compartir el código jocebaf

¿ Descarga el certificado sin necesidad de utilizar el captcha ?

Saludos

[jocebaf]

Asi es

[jggtz]

Gracias @jocebaf muy buen aporte