Kontrollera lösenord

2 svar · 232 visningar · startad av Mika3l 16 aug. 2004

Mika3lMedlem sedan nov. 20018 492 inlägg

Trådstart16 aug. 2004 16:25#1

Någon som har en enkel lösning på hur man kollar om ett lösenord (strNewPassword1) innehåller minst en siffra och är 6-20 tecken långt?

Engine^Medlem sedan dec. 20003 887 inlägg

16 aug. 2004 17:04#2

Med en sån här liten funktion kan du avgöra det.

Function ValidatePassword(strPass)
  Dim objRX

  ValidatePassword = False

  objRX.Pattern = "\d+"

  If objRX.Test(strPass) Then
    If Len(strPass) >= 6 And Len(strPass) <= 20 Then ValidatePassword = True
  End If
End Function

Mika3lMedlem sedan nov. 20018 492 inlägg

16 aug. 2004 19:37#3

Tackar, fungerar utmärkt!