نوشتن برنامه ای با ویژیال بیسیک

[r0z30yah]

سلام برنامه ای میخوام که از طریق حلقه های تو در تو بتواند پسورد را پیدا کند
مثال: پسوردی داریم با 10 رقم با اعداد بین 1 تا 10 این برنامه همه ی پسورد های احتمالی را تست میکند و در نتیجه پسورد باز میشود
و در اخر پسورد را به ما بدهد
خیلی ممنون میشوم اگر این برنامه را به من یاد بدهید
Thanks​

 

[r0z30yah]

سلام برنامه ای میخوام که از طریق حلقه های تو در تو بتواند پسورد را پیدا کند
مثال: پسوردی داریم با 10 رقم با اعداد بین 1 تا 10 این برنامه همه ی پسورد های احتمالی را تست میکند و در نتیجه پسورد باز میشود
و در اخر پسورد را به ما بدهد
خیلی ممنون میشوم اگر این برنامه را به من یاد بدهید
Thanks​

اگر تابه ی آن هم به من بگویید تامقداری کار منو راه میندازید

 

[the_king]

سلام برنامه ای میخوام که از طریق حلقه های تو در تو بتواند پسورد را پیدا کند
مثال: پسوردی داریم با 10 رقم با اعداد بین 1 تا 10 این برنامه همه ی پسورد های احتمالی را تست میکند و در نتیجه پسورد باز میشود
و در اخر پسورد را به ما بدهد
خیلی ممنون میشوم اگر این برنامه را به من یاد بدهید
Thanks​

به این روش که تمامی حالات ممکن امتحان میشه Brute-force می گویند، به حمله ای که بر اساس این روش برای کشف رمز انجام میشه هم Brute-force attack می گویند.
با توجه به تعداد حالاتی که باید چک بشه و سرعت پردازشگر، مدت زمانی که روش Brute-force صرف می کنه می تونه تا چندین قرن طولانی باشه، برای همین معمولا صرفا
زمانی از Brute-force استفاده میشه که هیچ راه حل دیگری در دسترس نباشه.

Option Explicit

Private Sub Form_Load()
    Dim i As Integer, c As Integer, password As String
    password = "0000000000"
    Do
        If TryPassword(password) Then
            MsgBox "Password found : " + password
            Exit Do
        End If
        For i = 1 To 10
            c = Val(Mid(password, i, 1))
            If c <> 9 Then
                password = String(i - 1, "0") + CStr(c + 1) + Mid(password, i + 1)
                Exit For
            End If
        Next
    Loop
    End
End Sub

Private Function TryPassword(p As String) As Boolean
    TryPassword = (p = "1782932000")
End Function

 

[r0z30yah]

ممنون که زحمت کشیدی از اونجایی ک این روش عملی نیست ایا روش بهتری به ما پیشنهاد میکنید
ما قصد داریم یک نرم افزار ک میدانیم پسورد ان هشت حرف لاتین حروف بزرگ است را باز کنیم