1. Ce site utilise des cookies. En continuant à utiliser ce site, vous acceptez l'utilisation des cookies. En savoir plus.
  2. Bonjour tout le monde ! Veillez consulter la Politique de forum pour comprendre nos règles, Merci a vous !
    Rejeter la notice

WM Problème de vérification de la chaine Hashée

Discussion dans 'Windev Mobile' créé par Man, Avr 13, 2019.

Tags:
  1. Man

    Man Active Member

    Inscrit:
    Juil 9, 2018
    Messages:
    290
    J'aime reçus:
    67
    Bonsoir les développeurs métiers je viens ici avec un problème je désire utiliser la fonction de hashage ce que j'ai fais mais il y aun problème je n'arrive pas à récupérer et comparer si tout t'es Ok
    voir code ce-dessous
    Code (Text):
    sHash_Binaire est une chaîne = HashChaîne(HA_MD5_128, Msg_à_Crypter)
    sHash_Hexa est une chaîne
    POUR nIndice = 1 _À_ Taille(sHash_Binaire)
        sHash_Hexa += NumériqueVersChaîne(Asc(sHash_Binaire[[nIndice]]),"02x")
    FIN

    RENVOYER sHash_Hexa
    ///////////////////////////////////////////////////////////////
    SI HashVérifieChaîne(HA_MD5_128, SAI_SaisieMotDePasse, ...
            Utilisateur.HashMotDePasse) = Vrai ALORS
    Info("Mot de passe correct.")
    // Suite du traitement
    // ...
    SINON
    Erreur("Mot de passe erroné.")
    // Reprise de la saisie
    RepriseSaisie(SAI_SaisieMotDePasse)
    FIN
    //////////////////////////////
    En attente de vos diverses solutions et je tiens à ça
    Bonne soirée à vous
     
    Tags:
  2. kabeda

    kabeda Active Member

    Inscrit:
    Avr 23, 2018
    Messages:
    173
    J'aime reçus:
    63
    Bonjour,
    Ce n'est qu'un bout de code pas du tout documenté donc difficile à comprendre.
    Tu pourrais expliquer un peu.
    Autrement
    Code (Text):

    RENVOYER sHash_Hexa
     
    ne permet pas d'exécuter la suite.
     
  3. Man

    Man Active Member

    Inscrit:
    Juil 9, 2018
    Messages:
    290
    J'aime reçus:
    67

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Bonjour,
    Ce n'est qu'un bout de code pas du tout documenté donc difficile à comprendre.
    Tu pourrais expliquer un peu.
    Autrement
    Code (Text):

    RENVOYER sHash_Hexa
     
    ne permet pas d'exécuter la suite.
    Cliquez pour agrandir...

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Ok
    Code (Text):
    Msg_à_Crypter est une chaîne = "Message à crypter"
    sHash_Binaire est une chaîne = HashChaîne(HA_MD5_128, Msg_à_Crypter)
    sHash_Hexa est une chaîne
    POUR nIndice = 1 _À_ Taille(sHash_Binaire)
        sHash_Hexa += NumériqueVersChaîne(Asc(sHash_Binaire[[nIndice]]),"02x")
    FIN

    RENVOYER sHash_Hexa
    trace(sHash_Hexa)
    ///////////////////////////////////////////////////////////////
    SI HashVérifieChaîne(HA_MD5_128, Msg_à_Crypter,sHash_Hexa) = Vrai ALORS
    Info("Mot de passe correct.")
    // Suite du traitement
    // ...
    SINON
    Erreur("Mot de passe erroné.")
    // Reprise de la saisie
    RepriseSaisie(SAI_SaisieMotDePasse)
    FIN
    Je pense avoir expliqué
    Merci pr cette attention
     
  • kabeda

    kabeda Active Member

    Inscrit:
    Avr 23, 2018
    Messages:
    173
    J'aime reçus:
    63
    Bonjour,
    Comment appelles tu ce bout de code, dans une fonction, un bouton... et qu'est ce qu'il est censé faire.
    As-tu vu ma remarque sur RENVOYER...
     
  • Man

    Man Active Member

    Inscrit:
    Juil 9, 2018
    Messages:
    290
    J'aime reçus:
    67
    Bonsoir j'ai pu résoudre le problème Merci

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    qui a attiré mon attention
    il fallu juste faire ceci
    HashChaine
    -------------------------
    Code (Text):
    SAI_Passe = HashChaîne(HA_MD5_128, SAI_Saisie1+"AREBGTS")
    // Vérifier la chaine saisie
    Code (Text):
    SI HashVérifieChaîne(HA_MD5_128, SAI_Passe+"AREBGTS", ...
            SAI_Saisie1) = Vrai ALORS
    Info("Chaine correcte.")
    // Suite du traitement
    // ...
    SINON
    Erreur("Chaine non correcte.")
    // Reprise de la saisie
    RepriseSaisie(SAI_Passe)
    FIN
     
  • Partager cette page

    Chargement...