- Tham gia
- 5/6/08
- Bài viết
- 30,703
- Được thích
- 53,963
Thằng bạn tôi hỏi:
- Tạo password thế nào mới an toàn đây mày?
- Tạo pass càng dài càng tốt, pass không có quy luật gì lại càng tốt
- Vậy mày tạo giùm tao đi
- Uh! Cho mày 1 "rừng" 30 ký tự luôn, dùng code này nha
- Giờ mày mở Excel lên, cho code trên vào 1 module, xong mày ra bảng tính, gõ vào 1 cell nào đó cái này: =CreateRandomPass(30) là sẽ có ngay 1 pass thuộc hàng... KHỦNG
Thằng bạn tôi tiến hành thí nghiệm ngay, sau khi thành công, kết quả nó như vầy: HfNU(mi^$yFl<G@TZs>AQbY2Mn7XN<
- Má ơi! Đến cả chính mình còn không nhớ nỗi thì chắc hổng có thằng khốn nào có thể nhớ được - Thằng bạn tôi có vẽ thích thú!
Nhưng nó chợt đăm chiêu:
- Nhưng nếu mình hổng nhớ pass thì làm sao nhập pass được đây?
- Ờ hén, để tao suy nghĩ xem!
Lát sau...
- Tao nghĩ ra rồi - Tôi nói - Đơn giản là mày lấy bút lông, viết lên máy tính của mày là xong
- Viết cái gì chứ?
- Thì viết ra cái pass vừa tạo đó chứ gì! Cứ ngồi lên máy tính là thấy ngay, khỏi sợ quên. Ẹc... Ẹc...
- Hay ta! Tao làm ngay! Mày giỏi quá
----------------
Nói thật, tôi cũng tin là mình giỏi, nếu không sao nghĩ ra được chiêu này!
!!!???
- Tạo password thế nào mới an toàn đây mày?
- Tạo pass càng dài càng tốt, pass không có quy luật gì lại càng tốt
- Vậy mày tạo giùm tao đi
- Uh! Cho mày 1 "rừng" 30 ký tự luôn, dùng code này nha
Mã:
Function CreateRandomPass(ByVal length As Long) As String
Dim i As Long, tmp As String
On Error Resume Next
If length > 0 Then
For i = 1 To length
Randomize
tmp = tmp & Chr(Int(Rnd() * 90) + 33)
Next
CreateRandomPass = tmp
End If
End Function
- Giờ mày mở Excel lên, cho code trên vào 1 module, xong mày ra bảng tính, gõ vào 1 cell nào đó cái này: =CreateRandomPass(30) là sẽ có ngay 1 pass thuộc hàng... KHỦNG
Thằng bạn tôi tiến hành thí nghiệm ngay, sau khi thành công, kết quả nó như vầy: HfNU(mi^$yFl<G@TZs>AQbY2Mn7XN<
- Má ơi! Đến cả chính mình còn không nhớ nỗi thì chắc hổng có thằng khốn nào có thể nhớ được - Thằng bạn tôi có vẽ thích thú!
Nhưng nó chợt đăm chiêu:
- Nhưng nếu mình hổng nhớ pass thì làm sao nhập pass được đây?
- Ờ hén, để tao suy nghĩ xem!
Lát sau...
- Tao nghĩ ra rồi - Tôi nói - Đơn giản là mày lấy bút lông, viết lên máy tính của mày là xong
- Viết cái gì chứ?
- Thì viết ra cái pass vừa tạo đó chứ gì! Cứ ngồi lên máy tính là thấy ngay, khỏi sợ quên. Ẹc... Ẹc...
- Hay ta! Tao làm ngay! Mày giỏi quá
----------------
Nói thật, tôi cũng tin là mình giỏi, nếu không sao nghĩ ra được chiêu này!
!!!???