[Gambas-user] CRYPT function - a little help please?

[Tony Morehen]

Dim userid As String

Dim encrypted As String
Dim cked As Boolean

userid = "xcodex"
encrypted = Crypt.md5(userid, "abcdefgh")
cked = Crypt.Check(userid, encrypted)
Print cked

On 2017-08-24 06:14 PM, mikeB wrote:
> userid = "xcodex"
> Crypt.MD5(userid, "abcdefgh")
> cked = Crypt.Check(userid, "abcdefgh")
> Message.Info(cked)