Bonjour à tous, aujourd'hui je vous pose mon problème. Alors je m'explique :

Sur mon programme, lors de l'inscription, il faut une clé d'inscription et celle-ci ce génère aléatoirement. Le problème c'est que je n'arrive pas à trouver le code qui va vérifier si la clé générée aléatoirement est correcte et faire en sorte que chaque clé généré par un utilisateur ne soit plus valide lorsque l'utilisateur va valider son inscription...

Ça m'a l'air complexe mais bon, c'est assez important, du coup je fais appel à vous les pro de la prog ..
J'utilise ce système de génération de lettre/clé aléatoire

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Public Function mdp() As String
        Dim s As String, k As Long
        s = Chr(Int(10 * Rnd()) + 48) + ""
        s = s + Chr(Int(26 * Rnd()) + 65) + ""
        s = s + Chr(Int(26 * Rnd()) + 65) + ""
        s = s + Chr(Int(26 * Rnd()) + 65) + ""
        s = s + Chr(Int(6 * Rnd()) + 52)
        s = s + Chr(Int(10 * Rnd()) + 48) + ""
        s = s + Chr(Int(10 * Rnd()) + 48)
        s = s + Chr(Int(10 * Rnd()) + 48) + ""
        mdp = s
    End Function


Merci, Cordialement.