vb.net驗證暗碼能否龐雜的辦法。本站提示廣大學習愛好者：（vb.net驗證暗碼能否龐雜的辦法）文章只能為提供參考，不一定能成為您想要的結果。以下是vb.net驗證暗碼能否龐雜的辦法正文
可在平安的體系中應用暗碼來向用戶受權。然則，暗碼必需難於被未受權用戶猜想出來。進擊者可使用一種“字典進擊”法式，該法式將遍歷一本字典（或分歧說話的多本字典）中的一切單詞，並測試能否有任何單詞就是用戶的暗碼。諸如“Yankees”或“Mustang”等弱暗碼可被很快猜想出來。諸如“?You'L1N3vaFiNdMeyeP@sSWerd!”等強暗碼被猜想出來的能夠性要小許多。暗碼掩護體系應確保用戶選擇強暗碼。
強暗碼很龐雜（包括年夜寫、小寫、數字和特別字符的組合），而且不是單詞。此示例演示若何驗證龐雜性。
示例
''' <summary>Determines if a password is sufficiently complex.</summary>
''' <param name="pwd">Password to validate</param>
''' <param name="minLength">Minimum number of password characters.</param>
''' <param name="numUpper">Minimum number of uppercase characters.</param>
''' <param name="numLower">Minimum number of lowercase characters.</param>
''' <param name="numNumbers">Minimum number of numeric characters.</param>
''' <param name="numSpecial">Minimum number of special characters.</param>
''' <returns>True if the password is sufficiently complex.</returns>
Function ValidatePassword(ByVal pwd As String, _
Optional ByVal minLength As Integer = 8, _
Optional ByVal numUpper As Integer = 2, _
Optional ByVal numLower As Integer = 2, _
Optional ByVal numNumbers As Integer = 2, _
Optional ByVal numSpecial As Integer = 2) _
As Boolean
' WordStr [A-Z] with \p{Lu}, to allow for Unicode uppercase letters.
Dim upper As New System.Text.RegularExpressions.Regex("[A-Z]")
Dim lower As New System.Text.RegularExpressions.Regex("[a-z]")
Dim number As New System.Text.RegularExpressions.Regex("[0-9]")
' Special is "none of the above".
Dim special As New System.Text.RegularExpressions.Regex("[^a-zA-Z0-9]")
' Check the length.
If Len(pwd) < minLength Then Return False
' Check for minimum number of occurrences.
If upper.Matches(pwd).Count < numUpper Then Return False
If lower.Matches(pwd).Count < numLower Then Return False
If number.Matches(pwd).Count < numNumbers Then Return False
If special.Matches(pwd).Count < numSpecial Then Return False
' Passed all checks.
Return True
End Function
Sub TestValidatePassword()
Dim password As String = "Password"
' Demonstrate that "Password" is not complex.
MsgBox(password & " is complex: " & ValidatePassword(password))
password = "Z9f%a>2kQ"
' Demonstrate that "Z9f%a>2kQ" is not complex.
MsgBox(password & " is complex: " & ValidatePassword(password))
End Sub
編譯代碼
經由過程傳遞包括該暗碼的字符串來挪用此辦法。
此示例須要：
拜訪 System.Text.RegularExpressions 定名空間的成員。假如沒有在代碼中完整限制成員稱號，請添加 Imports 語句。有關更多信息，請拜見 Imports 語句（.NET 定名空間和類型）。
平安性
假如要在收集直達移暗碼，您須要應用平安的辦法來傳輸數據。有關更多信息，請拜見 ASP.NET Web 運用法式平安性。
經由過程添加額定的龐雜性檢討，您可以改良 ValidatePassword 函數的精確性：
根據用戶的稱號、用戶標識符和運用法式界說的字典來比擬暗碼及其子字符串。另外，在履行比擬時，將看起來相似的字符視為雷同字符。例如，將字母“l”和“e”視為與數字“1”和“3”雷同的字符。
假如只要一個年夜寫字符，請確保它不是暗碼的第一個字符。
確保暗碼的最初兩個字符是字母字符。
不許可如許的暗碼：個中的一切符號都是經由過程鍵盤最下面的一排鍵輸出的。
