>Does anyone have a way to check a string to ensure that there are not two like characters side by side. This is for a password validation routine?
>
>Thanks

You can do something like

llOk = .T.
FOR i=1 TO LEN(lcStr)-1
  IF SUBSTR(lcStr,i) = SUBSTR(lcStr,i+1)
    llOk = .F.
    EXIT
  ENDIF
ENDIF