La Web del Programador: Comunidad de Programadores
 
    Pregunta:  38682 - CÓMO OCULTAR LETRAS EN UNA CONTRASEÑA Y QUE APARESCAN (*)
Autor:  Jorge
Necesito hacer un procedimiento en Clipper que admita varios usuarios y que cada ususario tenga su contraseña y no se como lograr que al escribir en lugar de que aparesca el caracter pullsado salga un asterisco, la contraseña debe de ser de diez caracters como maximo y de 6 como minimo.

Otra cosa que solo acepte letras y numeros ningun otro caracater del codigo assci, ademas que se puedan letras borrar.

Agradesco de antemano a los que me puedan ayudar. GRACIAS.

  Respuesta:  Dani
Fijáte... Está hecha para una clave de 6 dígitos, pero mejorála un poco, ya que le faltan las validaciones y demás. Decíme si anduvo.

Function Pass
parameters f, c && fila y columna
clear
i:=SPACE(1)
Clave:=""
x:=1
@ f,c+x,f,c+6 box "" color "w/w"

do while x<=6
@ f, c+x get i color "W/w"
read
Clave:=Clave+i
@ f,c+x say "*" color "n/w"
x:=x+1
enddo

do case
case Clave="DANIEL"
CLEAR
@ f, c say "BIENVENIDO"
case Clave="XYZ640"
CLEAR
@ f, c say "BUENOS DIAS"
otherwise
CLEAR
@ f, c say "NO TE CONOZCO"
ENDCASE
Return

  Respuesta:  RICARDO ATIENZA
ODLG:ACONTROLS[1];lpassaword:=.T.

  Respuesta:  Eliecer Rangel
Tengo una funcion que se llama getCrip que es especial para contraseñas puedes escoger el caracter que desees si les interesa escribeme y te lo envio [email protected]