• Trang chủ click to expand contents 

  • Demo_Tạo ra mật khẩu ngẫu nhiên (2 loại)

  • Demo_Tạo ra mật khẩu ngẫu nhiên (2 loại)

    maidinhdan > 18-07-15, 10:18 PM

    Đôi lúc bạn thấy nhàm chán phải suy nghĩ để tạo ra mật khẩu cho mình hoặc ai đó.
    Có khi cần phải tạo ra một mật khẩu khác nhau cho vài trăm hay vài nghìn người thì sẽ ra sau.

    Vâng đoạn code sau sẽ giúp các bạn tạo ra mật khẩu ấy.

    Ở đây minh sẽ trình bày 2 loại Demo để tạo ra mật khẩu đi kèm với nó là 2 hàm riêng biệt.

    Ở bài này xin trình bày 1 loại đầu tiên, đó là: lấy tất cả các ký tự trên bàn phím của mình, còn cái kế tiếp thì chỉ lấy 33 chữ cái + chữ số thôi.

    [Hình: hinhtaopassngaunhien1.jpg]

    Demo: Xem file đính kèm.

    Code:
    Mã PHP:
    Public Function Taopassngaunhien(Dodaimatkhau As Integer) As String
        Dim RetVal     As String
        Dim Max     As Integer
        Dim Min     As Integer, i As Integer
        Max     = 126
        Min     = 48
        Randomize Timer
            For i = 1 To Dodaimatkhau
        RetVal     = RetVal & Chr(Int((Max - Min + 1) * Rnd + Min))
        Next i
        Taopassngaunhien     = RetVal
    End     Function 


    Khi cần thì alo:

    Mã PHP:
    Taopassngaunhien(8) 

    Trong đó: số 8 là độ dài ký tự cần tạo ra.

  • RE: Demo_Tạo ra mật khẩu ngẫu nhiên

    maidinhdan > 19-07-15, 01:29 PM

    Đoạn code thứ 2 về tạo mật khẩu ngẫu nhiên lấy 33 chữ cái và 10 số.


    [Hình: hinhtaopassngaunhien2.jpg]

    Demo: Xem file đính kèm.

    Code:
    Mã PHP:
    Public Function Taopassngaunhien2(Dodaicantao As Integer) As String
        Dim sTmp     As String
        sTmp     = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"
        Dim i, RndPos As Integer
        Randomize
            For i = 1 To Dodaicantao
            RndPos     = Int(Len(sTmp) * Rnd + 1) 
            Taopassngaunhien2 = Taopassngaunhien2 & Mid$(sTmp, RndPos, 1) 
        Next i
    End     Function 


    Khi cần thì alo:

    Mã PHP:
    Taopassngaunhien2(8) 

    Trong đó: số 8 là độ dài ký tự cần tạo ra.
    [/quote]

  • RE: Demo_Tạo ra mật khẩu ngẫu nhiên (2 loại)

    NguyenDungAnh > 15-08-18, 10:57 PM

    Thash bác cũng thấy hay hay laughing