Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <Array.au3>
- Local $iPwLength = 20
- Local $pw[$iPwLength]
- Local $alphabet = StringSplit("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvxyz0123456789", "", 3)
- $pw[0] = Random(0, 9, 1)
- $pw[1] = $alphabet[Random(0, 25, 1)]
- $pw[2] = $alphabet[Random(26, 50, 1)]
- _ArrayShuffle($alphabet)
- For $i = 4 to $iPwLength - 1 Step 1
- $pw[$i] = $alphabet[Random(0, 60, 1)]
- Next
- _ArrayShuffle($pw)
- MsgBox(0, "", _ArrayToString($pw, ''))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement