• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

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

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thư Viện Hàm
  • [Hàm] 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)

• 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.
  
  

  

  
  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ố.
  
  
  

  

  
  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
• Bài trước Bài tiếp