[RESOLVED] Password Verification

[Tito Fadda]

I dont know if my problem is similar to this or no but here it is :
Im making a simple program in which the user have an option to change password but the new password must be at least of 5 characters and must have at least one number. I could do the first part but for number filter, I almost tried all ways I know. So, I appreciate any help in this.
Ty in advance =)

[Pradeep1210]

Your problem doesn't even remotely relate to the original thread post.
Also do you know that you are posting to a 2 year old thread?
You might get a better response if you start your own new thread.

Regarding your problem, similar questions have been asked numerous times on this forum and searching for similar threads might reveal you useful post. If that doesn't help, let us know and we will be glad to post new solutions to your problem.

[Hack]

Split into its own thread

Even if your problem was exactly the same as the 2 year old thread your posted your question in, you should always start a new thread.

[macmatira]

I dont know if my problem is similar to this or no but here it is :
Im making a simple program in which the user have an option to change password but the new password must be at least of 5 characters and must have at least one number. I could do the first part but for number filter, I almost tried all ways I know. So, I appreciate any help in this.
Ty in advance =)

use the code

Isnumeric (string)

i hope this code help you.
it filters.

but i'm not sure.
just try and explore.
ty.

[MartinLiss]

Private Sub Command1_Click()
Dim lngIndex As Long
Dim bFound As Boolean
 
If Len(txtPassword.Text) < 5 Then
    MsgBox "Password is too short"
    Exit Sub
End If
 
For lngIndex = 1 To Len(txtPassword.Text)
    If IsNumeric(Mid(txtPassword.Text, lngIndex, 1)) Then
        bFound = True
        Exit For
    End If
Next
 
If Not bFound Then
    MsgBox "Password must contain at least one numeric character"
    Exit Sub
End If
 
End Sub

[Tito Fadda]

Ty so much Marting, thats exactly what I want ... and sorry guys, I didnt notice date for old forums, I was too angry to look at date