• Home
 · 
• Encryption
 · 
• Non-reverseable Encryption Engine To Verify Passwords and other issues.

Non-reverseable Encryption Engine To Verify Passwords and other issues.

Non-reverseable Encryption Engine To Verify Passwords and other issues.

API Declarations


variableforpassword = Encrypt("Password")
To Check
variable = Encrypt(text1.text or anything, "variableforpassword)
If they match, variable = 1
If not, variable = 0
Questions, Comments, CONSTRUCTIVE criticisim Email me @
[email protected]



Rate Non-reverseable Encryption Engine To Verify Passwords and other issues.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

For i = 1 To Len(inp)
    Bit = Asc(Mid(inp, 2, 1))
    Bit = Bit - i
    Encrypt = Encrypt & Chr(Bit)
Next i

If Pass <> "" Then
    If Encrypt = Pass Then
        Encrypt = "1"
    Else
        Encrypt = "0"
    End If
End If
End Function