Password Login Error

[adaoluz]

Hello friends, Good afternoon!




Okay ?, I have this bank that is divided in two parts between front end and back end, but I found a difficulty logging into the database.


all passwords are: admin


but I can not access it in any way.



https://mega.nz/#!RIUD0ArB!OaUG6X7eG...d32eLNGTY3vCRA

[CJ_London]

most responders will not go to an unknown site - recommend you zip the files and upload the zip file to this thread (go to the advanced editor and find manage attachments below the edit window)

[adaoluz]

the file exceeds 10 megs, I can not attach to the site.

[GinaWhipp]

Hmm, well downloaded file but not in English so not much I can do. I am only mentioning in case anyone else downloads.

[adaoluz]

Okay ,thanks!!

[June7]

Did you build this db? When I first opened db, a form opened that is not the login form. Apparently that form somehow updated a field with project path. I closed and reopened db and this time it goes directly to login form.

If StrComp(Me!senha, fncCrip(.Column(2), 102030), vbBinaryCompare) = 0 Then

That code compares user input with encryption of that input, which makes no sense, so of course "admin" = "E@IMJ" fails.

Need to compare user input with value in table, consider:

If StrComp(Me.Senha, DLookup("Senha", "tblUsuários", "Usuario=" & Me.cboUsuário), vbBinaryCompare) = 0 Then

[adaoluz]

Yes, so what can I do in this case?

[June7]

Apparently I edited my post after you read. Review again.

[adaoluz]

I made the changes, everything went fine.
thank you.