Password/Logon Field and "Encryption"

[Dan2kx]

Hello to all,

im bored and like to waste time doing silly things that are not really neccessary...

i am however tying to complete a Holiday database for my Boss... looking for sum brownie points tehe

so what i have so far is a logon form, straight forward and boring, does username match the list and the password match that stored, one thing i noticed is that the password match is not case sensitive.... so HeLlO would match hello/hElLo basically, is there a way to improve this? at the mo i am comparing the textbox string to a dlookup string.

my second waste of time is that i want to "encrypt" the passwords...(no real reason to cos i intend on splitting the db but like i said... im bored)

so i can use this

Pass = me!passwordfield
Pass = Replace(pass,"a","b")
Pass = Replace(pass,"b","c")

etc etc, that obviosly switches the letters about etc, but i would need a lot of lines of code to do the whole alphabet and numbers etc... and if i duplicate retirn letters it might mess up, so without carefull planning then my encryptyion would just mess things up (but work all the same)

what i wonder is if there is an easier way...

Thanks for your time... bet you are all bored too now!

[Dököll]

Hello to all,

im bored and like to waste time doing silly things that are not really neccessary...

i am however tying to complete a Holiday database for my Boss... looking for sum brownie points tehe

so what i have so far is a logon form, straight forward and boring, does username match the list and the password match that stored, one thing i noticed is that the password match is not case sensitive.... so HeLlO would match hello/hElLo basically, is there a way to improve this? at the mo i am comparing the textbox string to a dlookup string.

my second waste of time is that i want to "encrypt" the passwords...(no real reason to cos i intend on splitting the db but like i said... im bored)

so i can use this

Pass = me!passwordfield
Pass = Replace(pass,"a","b")
Pass = Replace(pass,"b","c")

etc etc, that obviosly switches the letters about etc, but i would need a lot of lines of code to do the whole alphabet and numbers etc... and if i duplicate retirn letters it might mess up, so without carefull planning then my encryptyion would just mess things up (but work all the same)

what i wonder is if there is an easier way...

Thanks for your time... bet you are all bored too now!

Hello, Dan2kx!

Nice pleasing the boss, isn't it? Your password form should not allow that happen, you may need to see if you do not have the fields set to autocorrect, please forgive me I am also new at this.

I believe there's a way to get Access to dramatically correct as we type, and so on, this may be what is happneing.

How 'bout checking on that and see what you have?

In a bit!

[NeoPa]

I have a VERY rudimentary encryption routine I use in Access.

'If I told you what this did I'd have to kill you.
Public Function Scramble(strPW As String)
  Dim intIdx As Integer
 
  Scramble = strPW
  For intIdx = 1 To Len(strPW)
    Mid(Scramble, intIdx, 1) = _
      Chr(&H40 Or (Not Asc(Mid(strPW, intIdx, 1))) And &H3F)
  Next intIdx
End Function