mot de passe

Question

comment arriver à générer des mots de passes automatiquement?

Answer 1

Bonjour,

 

C'est une question un peu vague.

Si vous n'avez pas de contrainte sur vos mots de passe, vous pouvez par exemple générer un Guid et prendre ses 8 premières lettres, les 8 caractères du mot de passe généré sont dans l'ensemble {a, b, c, d, e, f, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9}. L'idée est fondée sur le fait que un Guid est généré aléatoirement et il est unique presque à 100%. La fonction suivante implémente la proposition.

 

   Public Function GenererMotDePasse()

        Dim motDePasse = Guid.NewGuid().ToString().Substring(0, 8)

        Return motDePasse

    End Function

 

Cordialement

Answer 2

Bonjour,

sinon vous pouvez créer un petit code qui permet de faire le mot de passe

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        MsgBox(GenerateRandomString(10, GenerateRandomAlphaString(25)))
    End Sub
    Public Shared Function GenerateRandomAlphaString(ByVal length As Integer) As String
        Const alpha As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
        Return GenerateRandomString(length, alpha)
    End Function
 
 
    Public Shared Function GenerateRandomString(ByVal length As Integer, ByVal alphabet As String) As String
        Dim maxlen As Integer = alphabet.Length
 
        Dim sb As New StringBuilder()
        Dim rd As New Random
        For i As Integer = 0 To length - 1
            sb.Append(alphabet(rd.Next(0, maxlen)))
        Next
 
        Return sb.ToString()
    End Function

---

Cordialement,
Xavier TALOUR
Alias Troxsa SendMail

Answer 3

Bonjour, Mehodev,

Est-ce que vous avez testé les solutions proposées ? Merci de tenir la communauté informée sur la suite de vos démarches.

 

Bonne journée,

Cipri

---

 

Ciprian DUDUIALA, MSFT  
•Nous vous prions de considérer que dans le cadre de ce forum on n’offre pas de support technique et aucune garantie de la part de Microsoft ne peut être offerte.

Answer 4

merci les gars cela m'a permis d'avancer dans ma bosse