MD5 Archivo

[robson...@hotmail.com]

¡Hola, buenos días Devs!

Necesito un MD5, noté que existe el md5 de una cadena y un archivo, en mi caso específico estoy consumiendo un WS Soap que enviaré un archivo en Base64 hasta ahora todo está bien, otra información necesito enviar MD5 del Archivo, busqué funciones y no encontré a nadie que tuviera algún consejo?

Gracias Robson

[Esteban Herrero]

Podes usar esta librería free http://xstandard.com/en/documentation/xmd5/

Tiene un ejemplo en VB pero lo convertis a VFP y la usas sin costo alguno.

Tambien tenes Fox Crypto, VfpEncryption y tambien tenes google donde podes ver en el grupo distintas formas p lograr el MD5.

Saludos

--
Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/81179935-38cf-4748-b243-e6e3b9c0e25fn%40googlegroups.com.

[ggcagnola gmail]

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/14f32e8e-8c5f-91aa-4789-72ada7836790%40yahoo.com.ar.

Libre de virus. www.avast.com

[robson...@hotmail.com]

Hola Esteban 

Intenté hacer uso de lib crypto.fll pero supongo que hay algo más que hacer porque la forma en que lo ejecuté a continuación no devuelve un MD5

ya vfpEncryption No encontré esta lib para descargar

Exemplo
SET LIBRARY TO LOCFILE("foxcrypto.fll") ADDITIVE

? MD5( "123" )

Retorna o seguinte: ,¹b¬Y [–K -#Kp

[robson...@hotmail.com]

Consegui!!!!! 

Exemplo
SET LIBRARY TO LOCFILE("foxcrypto.fll") ADDITIVE

?   STRCONV(MD5( "123" ), 15)  ->>> 202CB962AC59075B964B07152D234B70 

\o/  

Valeu ai pessoal!!!!

[Esteban Herrero]

Ahi encontre como lo hacia con la librería q te mencioné

loMD5 = CREATEOBJECT("XStandard.MD5")
lcChecksum1 = loMD5.GetCheckSumFromFile('archivo')
 

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/582d9f5f-9648-4552-a2c3-7a694c7d41f4n%40googlegroups.com.