Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Force to use strong password
Message
From
06/11/2006 13:34:48
 
 
To
06/11/2006 13:23:07
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01167371
Message ID:
01167386
Views:
8
>If you mean in a VFP app, it should be pretty easy. Spin through the string, looking at each character. Keep a running count of how many are ISDIGIT(), ISUPPER() and ISLOWER(). You have a strong password if:
>
>( LEN() >= 6 ) AND( DigitCount >= 1 ) AND ( NonDigitCount >= 2 ) AND ( UpperCount >= 1 ) AND ( LowerCount >= 1 )

I doänt understand the need for NonDigitCount. Is the following code best way to check for a strong password ?
FUNCTION IsStrongPassword( cStr )

LOCAL i, nDigitCount, nUpperCount, nLowerCount
STORE 0 TO nDigitCount, nUpperCount, nLowerCount
FOR i=1 TO LEN(cStr)
  DO case
    CASE ISDIGIT( SUBSTR(m.cStr,m.i))
      nDigitCount = nDigitCount + 1

    CASE ISUPPER(SUBSTR(m.cStr,m.i))
      nUpperCount = nUpperCount + 1

    CASE ISLOWER(SUBSTR(m.cStr,m.i))
      nLowerCount = nLowerCount + 1
    ENDCASE
ENDFOR

RETURN LEN(m.cStr)>5 AND m.nUpperCount>0 AND m.nLowerCount>0
Andrus
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform