Este artículo ha sido consultado en 407 ocasiones.

La función se explica por sí mísma. Gracias a Richard Sobisky por la ayuda!

1:<?php 2:// Funcion para generar nuevo password 3:// Manuel Montoya - GPL 2005 4:// ------------------ 5:// MODOS 6:// 1 - (n)minusculas 7:// 2 - (n)(minusculas + numeros) 8:// 3 - (n)(minusculas + mayusculas + numeros) 9:// 4 - (n)minusculas + (n)numeros 10:// 5 - (n)solo numeros 11:// ------------------ 12: 13:function generapass($len=4,$mode=4) { 14: 15: $chars=array(); 16: $chars2=array(); 17: 18: if ($mode > 1) { 19: //agrega numeros a $chars 20: for($i=48;$i<=57;$i++) { 21: array_push($chars, chr($i)); 22: } 23: } 24: 25: if ($mode==3){ 26: // agrega mayusculas a $chars 27: for($i=65;$i<=90;$i++) { 28: array_push($chars, chr($i)); 29: } 30: } 31: 32: if ($mode > 3){ 33: // agrega minusculas a $chars2 34: for($i=97;$i<=122;$i++) { 35: array_push($chars2, chr($i)); 36: } 37: }else{ 38: 39: // agrega minusculas a $chars 40: for($i=97;$i<=122;$i++) { 41: array_push($chars, chr($i)); 42: } 43: } 44: if ($mode==4){ 45: //construye la primera mitad del password $chars2 (minusculas) 46: for($i=0;$i<$len;$i++) { 47: mt_srand((double)microtime()*1000000); 48: $passwd.=$chars2[mt_rand(0,(count($chars2)-1))]; 49: } 50: //construye la segunda mitad del password $chars2 (numeros) 51: for($i=0;$i<$len;$i++) { 52: mt_srand((double)microtime()*1037800); 53: $passwd.=$chars[mt_rand(0,(count($chars)-1))]; 54: } 55: }else{ 56: // construye password 57: for($i=0;$i<$len;$i++) { 58: mt_srand((double)microtime()*1000000); 59: $passwd.=$chars[mt_rand(0,(count($chars)-1))]; 60: } 61: } 62: return $passwd; 63:} 64: 65:$newpassword = generapass(8, 3); // password de 8 caracteres y modo 3 66: 67:print "<br />El nuevo password es: " . $newpassword . "<br />"; 68: 69:?>

La coloración del código es fácil con:

y su code2HTML plugin.

Última actualización: 2007-04-29 10:56:59-05

scarecrow está:
Du hast?
3 hours, 35 minutes ago

der_teufel está:
Ich habe einen Kater, aber nicht so schlecht...
11 hours, 10 minutes ago

rnstux está:
Y yo un Abrazo.
1 day, 11 hours ago

saidjose está:
Dandole su habrazote a mi santa madre que me soporta
1 day, 13 hours ago

dsquid está:
esperando a que este el pozole
1 day, 14 hours ago

asarch está:
He cambiado NetBSD por Fedora 8, es que era muy "caliente"
2 days ago

Que estuvimos haciendo >>

Consultoría y Soporte