1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.
  2. Anuncie Aqui
    Anuncie aqui você Também: fdantas@4each.com.br

Criptografia MD5

Discussão em 'Progress 4GL' iniciado por jonas, Julho 21, 2010.

  1. asbahr

    asbahr Membro Participativo

    Assim eu me expressei mau!
    Mas tem como calcular o HASH MD5 das informações contidas dentro do arquivo txt.

    por exemplo um arquivo texto com nome teste.txt e dentro dele as informações:
    Teste25022011ruamoraes285jdamoreiras
  2. robsoncruzjr

    robsoncruzjr Sem Pontuação

    Boa noite pessoal.
    Vi que esse código só funciona no Open Edge, alguem ai sabe algum jeito de usar isso na 9.1e ? Estou procurando mas não consegui achar ainda :oops:
    Abraços e tks
  3. robsoncruzjr

    robsoncruzjr Sem Pontuação


    Amigo, abre o arquivo, le o conteudo e gera o hash da informaçao que você quiser :D

    Código:
    DEFINE VARIABLE m-Texto AS CHARACTER  NO-UNDO.
    DEFINE VARIABLE m-Hash  AS CHARACTER   NO-UNDO.
    INPUT FROM "C:\TMP\ARQUIVO.TXT" NO-CONVERT.
    REPEAT:
        IMPORT UNFORMATTED m-Texto.
        m-Hash = HEX-ENCODE(MD5-DIGEST(m-Texto)).
        MESSAGE "HASH MD5: " m-Hash
            VIEW-AS ALERT-BOX INFO BUTTONS OK.
    END.
    INPUT CLOSE.
    
    abraços

Compartilhe esta Página