Tema: Contraseña Aleatorio
Ver Mensaje Individual
  #3 (permalink)  
Antiguo 12/07/2004, 14:41
Avatar de MartYn
MartYn
 
Fecha de Ingreso: junio-2004
Ubicación: MTY-Mexico
Mensajes: 49
Antigüedad: 20 años, 11 meses
Puntos: 0
EXCELENTE me gusto mas asi :)

Resuelto
asi lo deje
Cita:

<%
Dim confirmado, valor
randomize

For I = 1 to 6
confirmado = Int((57 - 48 + 1) * Rnd + 48)
valor = valor & chr(confirmado)
next

Response.Write "Codigo creado: <B>"&valor&"</B>"
%>