تقييم الموضوع :
  • 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
تسلم ربي يسعدك
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] جملة اتصال بملف اكسيل ٢٠٠٣ بكلمة مرور Mr.H 4 78 منذ 12 دقيقة مضت
آخر رد: Mr.H
  كود انشاء نسخة احتياطية محمد بن عطية 1 131 21-02-24, 09:59 PM
آخر رد: atefkhalf2004
  كيفية انشاء سكريبت لقاعدة بيانات من خلال الكود heem1986 1 194 20-02-24, 12:00 AM
آخر رد: Kamil
  انشاء قاعدة بيانات من ملف سكربت strongriseman 5 500 17-02-24, 02:57 PM
آخر رد: strongriseman
  [سؤال] كيفية انشاء فورم داخل مشروعى عاصم النجار 2 305 05-01-24, 12:36 AM
آخر رد: HALIM ELEULMA
  مشكلة فى انشاء تقرير خالد كامل1 4 221 04-01-24, 10:04 PM
آخر رد: خالد كامل1
  انشاء واجهات برنامج شؤون الموظفين والرواتب شمسـ لا تغيب 5 12,850 27-09-23, 10:05 PM
آخر رد: melad2002
  سؤال عن طريقة انشاء شجرة عائلة ابو انس 2 447 10-07-23, 09:58 PM
آخر رد: ابو انس
  لماذا يتم انشاء العديد من كائنات الاتصال ابو محمد محمد محمد 12 964 27-04-23, 01:54 PM
آخر رد: ابو محمد محمد محمد
  انشاء القاعدة سكول في مسار محدد atefkhalf2004 6 767 17-04-23, 04:48 PM
آخر رد: DanSmith

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


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