تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كود انشاء كلمة مرور بمواصفات قوية
#1
Question 
كود انشا كلمة مرور من قبل المستخدم وتخزينها في متغير
بحيث تكون بشروط معينه  مثل ان تكون بطول 8 خانات و تكون فيها ارقام وحروف ورموز 
لا يشترط الترتيب على اقل تشمل حرف ورمز ورقم اجباري واذا أراد الزيادة مسموح
الرد }}
تم الشكر بواسطة:
#2
PHP كود :
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

    
' Replace [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 

وهذا كود يمكن وضعه في اي حدث تريد للتحقق من كلمة المرور توافق المعاير التي وضعتها

كود :
Private Sub Button1_Click(ByVal Sender As Object, _
ByVal e As System.EventArgs) Handles Button1.Click
Dim MatchNumberPattern As String = "^.*(?=.{6,})(?=.*\d)(?=.*[a-z])(?=.*[A-Z])(?=.*[@#$%^&+=]).*$"
If TextBox2.Text.Trim <> "" Then
If Not Regex.IsMatch(TextBox2.Text, MatchNumberPattern) Then
MessageBox.Show("Invalid password !")
End If
End If
End Sub

وهي حسب الشروط التالي
 (?=.{6,}) العدد 6 يدل على اقل عدد خانات مطلوب يمكنك تغييره لما تريد
(?=.*\d) التحقق من وجود رقم واحد
(?=.*[a-z]) التحقق من وجود حرف صغير
(?=.*[A-Z]) التحقق من وجود حرف كبير
(?=.*[@#$%^&+=]) التحقق من وجود رمز 
الرد }}
#3
تسلم ربي يسعدك
الرد }}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] طلب مساعدة في كود قراءة النص كلمة كلمة waelalmsry75 3 503 07-06-22, 09:00 AM
آخر رد: asmarsou
Star الاستعلام بعلامة = بدلا من كلمة Like أبو خالد الشكري 5 320 03-06-22, 07:48 PM
آخر رد: asemshahen5
  [VB.NET] backup انشاء نسخ احتياطي من اجهزة على الشبكة محمد بوقزاحة 3 316 01-06-22, 05:20 PM
آخر رد: نيمو
  انشاء قاعدة بيانات SQL SERVER +عمل أتاتش + جداول+حقول بالكود DR.YASER 4 771 20-05-22, 02:47 PM
آخر رد: DR.YASER
  [سلسلة تعليمية] انشاء قاعدة بيانات +جداول+حقول بالكود .تطوير للمشروع السابق DR.YASER 3 486 19-05-22, 07:05 PM
آخر رد: DR.YASER
  [كورس] انشاء قاعدة بيانات فارغة و جديدة أثناء التشغيل-درس مهم و مثال DR.YASER 9 778 19-05-22, 04:43 AM
آخر رد: DR.YASER
  [VB.NET] انشاء داتابيز اكسس بالكود flawer69 3 405 17-05-22, 11:17 PM
آخر رد: DR.YASER
  [VB.NET] انشاء قاعدة بيانات access فارغة وقت التشغيل mmaalmesry 2 424 14-05-22, 11:20 PM
آخر رد: mmaalmesry
  ممكن طريقة اضافة باسورد عند انشاء برنامج للقنوات لكي عندما احد يريد ان يدخل الى البرن omar dz 6 1,233 20-03-22, 07:37 PM
آخر رد: omar dz
Question [سؤال] انشاء برنامج بلغه فجول بيسك نسيم الشباطي 1 781 20-03-22, 01:19 PM
آخر رد: عدنان الشمري

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم