Codigo Fuente en Delphi para validar el sello

Para los que programamos en Delphi, aqui estan las respuestas

Codigo Fuente en Delphi para validar el sello

Notapor DADO » Sab Nov 06, 2010 8:08 am

Aqui esta, porque ustedes lo pidieron, el codigo fuente para validar el sello.

Solo es un Micro-mini validador que verifica el sello, no valida folios ni certificados pero eso creo que eso no es tan dificil, muy laborioso talvez pero dificil no.

Este programa es ego-ware, que significa? que lo unico que me gustaria recibir es un "gracias" "esta chido" "me ha sido muy util" o algo similar para alimentar mi ego ...... :P

Ah!, esta en Delphi 7, me avisan si hay problemas con D2009 y D2010.
Adjuntos
ValidaSello.zip
(1.02 MiB) 658 veces

ADDENDAS? VALIDACION? CODIGO PARA PROGRAMAR TU PROPIA SOLUCION? TODO LO TENEMOS EN WWW.VALIDACFD.COM VISITANOS !!

DALE CLIC EN "Suscribir Tema" AL FINAL DE LA PAGINA PARA QUE EL FORO TE AVISE POR MAIL CUANDO HAY UNA RESPUESTA
Avatar de Usuario
DADO
 
Mensajes: 9520
Registrado: Mar Jul 06, 2010 8:56 pm

Re: Codigo Fuente en Delphi para validar el sello

Notapor marcoev » Sab Nov 06, 2010 11:37 am

Muchas gracias por el aporte lo voy a probar en Delphi 2010, ahi te aviso como funciono.

Atte
Marco
marcoev
 
Mensajes: 20
Registrado: Lun Sep 13, 2010 11:47 pm

Re: Codigo Fuente en Delphi para validar el sello

Notapor Salim Giacoman » Lun Nov 08, 2010 4:01 pm

muchisimas gracias dado!!!!

yo lo probare con el viejito Delphi6...
Salim Giacoman
 
Mensajes: 63
Registrado: Jue Jul 15, 2010 3:45 pm

Re: Codigo Fuente en Delphi para validar el sello

Notapor EJSG » Lun Nov 08, 2010 5:54 pm

Nuevamente gracias... funciono perfectamente en D7. Ya lo probe con CFDs validos e incluso con unos invalidos que tenia por ahi.
EJSG
 
Mensajes: 73
Registrado: Jue Jul 08, 2010 8:18 pm

Re: Codigo Fuente en Delphi para validar el sello

Notapor Salim Giacoman » Lun Nov 08, 2010 8:22 pm

aun no veo el codigo, pero asi, antes de ver el codigo traigo un pequeña duda:

un cliente acaba de recibir un CFD que NO TRAI el certificado incluido, si mal no recuerdo es valido (dentro de la norma), solo que el proveedor te debera enviar tambien el certificado, ahora, si meto el dichoso CFD a tu "ValidaCFD" me da "sello valido", pero... ¿¿¡¡como demonios determinas su valides!!?? si no tienes el certificado!!!
Salim Giacoman
 
Mensajes: 63
Registrado: Jue Jul 15, 2010 3:45 pm

Re: Codigo Fuente en Delphi para validar el sello

Notapor DADO » Mar Nov 09, 2010 10:58 am

Salim Giacoman escribió:aun no veo el codigo, pero asi, antes de ver el codigo traigo un pequeña duda:

un cliente acaba de recibir un CFD que NO TRAI el certificado incluido, si mal no recuerdo es valido (dentro de la norma), solo que el proveedor te debera enviar tambien el certificado, ahora, si meto el dichoso CFD a tu "ValidaCFD" me da "sello valido", pero... ¿¿¡¡como demonios determinas su valides!!?? si no tienes el certificado!!!


Hola Salim, disculpa que no haya querido contestar esta pregunta por mail, pero a mas de uno le va a interesar este pequeño secreto que descubri :

TODOS los certificados estan disponibles en un ftp del SAT, cuando no tiene certificado interno mi programa de ValidaCFD descarga el certificado de ese ftp.

La direccion es ftp://ftp2.sat.gob.mx/Certificados/FEA/

Nota importante, los CERTIFICADOS DE SELLO DIGITAL estan en la carpeta Certificados/FEA, porque estan en FEA? solo Dios y los mensos del SAT saben eso

ADDENDAS? VALIDACION? CODIGO PARA PROGRAMAR TU PROPIA SOLUCION? TODO LO TENEMOS EN WWW.VALIDACFD.COM VISITANOS !!

DALE CLIC EN "Suscribir Tema" AL FINAL DE LA PAGINA PARA QUE EL FORO TE AVISE POR MAIL CUANDO HAY UNA RESPUESTA
Avatar de Usuario
DADO
 
Mensajes: 9520
Registrado: Mar Jul 06, 2010 8:56 pm

Re: Codigo Fuente en Delphi para validar el sello

Notapor Salim Giacoman » Mar Nov 09, 2010 1:05 pm

me lo imagine ;)

felicidades Sr por su codigo!!!!
Salim Giacoman
 
Mensajes: 63
Registrado: Jue Jul 15, 2010 3:45 pm

Re: Codigo Fuente en Delphi para validar el sello

Notapor memorami » Mar Nov 09, 2010 1:38 pm

Felicidades y gracias, me funciona bien, solo que al agregarlo a mi programa realizado en Delphi 6 no se porque solo me genera los primeros 3 txt, al parecer necesita esperar algo de tiempo para ejecutar el openssl.bat porque por fuera si crea los demas txt.
memorami
 
Mensajes: 6
Registrado: Mar Nov 09, 2010 1:34 pm

Re: Codigo Fuente en Delphi para validar el sello

Notapor DADO » Mar Nov 09, 2010 1:52 pm

memorami escribió:Felicidades y gracias, me funciona bien, solo que al agregarlo a mi programa realizado en Delphi 6 no se porque solo me genera los primeros 3 txt, al parecer necesita esperar algo de tiempo para ejecutar el openssl.bat porque por fuera si crea los demas txt.


Si solo genera los primeros 3 entonces falta todos los demas que genera el OpenSSL.bat

Ejecuta manualmente el OpenSSL.bat y revisa si te marca algun error.

ADDENDAS? VALIDACION? CODIGO PARA PROGRAMAR TU PROPIA SOLUCION? TODO LO TENEMOS EN WWW.VALIDACFD.COM VISITANOS !!

DALE CLIC EN "Suscribir Tema" AL FINAL DE LA PAGINA PARA QUE EL FORO TE AVISE POR MAIL CUANDO HAY UNA RESPUESTA
Avatar de Usuario
DADO
 
Mensajes: 9520
Registrado: Mar Jul 06, 2010 8:56 pm

Re: Codigo Fuente en Delphi para validar el sello

Notapor memorami » Mar Nov 09, 2010 2:03 pm

Al llegar a este procedimiento EjecutaExterno(ExePath + 'OpenSSL.bat'); no ejecuta nada pareciera que no hace caso a las instrucciones que estan dentro del .bat y manualmente ya teniendo los archivos cadoriginal.txt, cert.txt y sello.txt si me genera los demas: pubkey.txt, resultado.txt, resultado_sha1.txt y sellobin.txt.

Pareciera que no encontrara en la ruta el openssl.exe, pero esta en el mismo directorio.

Gracias de antemano.
memorami
 
Mensajes: 6
Registrado: Mar Nov 09, 2010 1:34 pm

Siguiente

Volver a Delphi

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados