Podría alguien indicarme alguna guia para crear un sistema en que se le envie al usuario su contraseña cuando este no la recuerde.-
Ahora mismo tengo creado un sistema en el que yo le asigno directamente las contraseñas y nombre de usuario a la base de datos, pero para lo que quiero hacer no me sirve. Y sería este:
-----------------------------
<form action="controlando.asp" method="POST">
<table align="center" width="225" cellspacing="0" cellpadding="0" border="0">
<tr> <%
if request.querystring("errorusuario")<>"si" then
%>
<td colspan="2" align="center">Introduce tu clave de acceso</td>
<%
else
%>
<td colspan="2" align="center" bgcolor=#ff0000><span style="color:ffffff"><b>Datos
incorrectos</b></span></td>
<%
end if
%> </tr>
<tr>
<td align="right">USER:</td>
<td>
<input type="Text" name="usuario" size="8" maxlength="50">
</td>
</tr>
<tr>
<td align="right">PASSWD:</td>
<td>
<input type="password" name="contrasena" size="8" maxlength="50">
</td>
</tr>
<tr>
<td colspan="2" align="center">
<input type="Submit" value="ENTRAR" name="Submit">
</td>
</tr>
</table>
</form>
---------------------------
<%
' miro a ver si la autentificacione es correcta
'creo una sentencia SQL con los datos recibidos
ssql = "select * from usuarios_autentificacion where nombre_usuario='" & request.form("usuario") & "' and clave_usuario='" & request.form("contrasena") & "'"
'conecto y extraigo de la base de datos
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ("DSN=capulloconorejas")
set RS = Conn.Execute(sSQL)
if (not RS.eof) then
'Como se ha localizado un registro es que ese usuario existe y su contraseña es correcta
'coloco las variables de sesion
session("autentificado") = "si"
'redirecciono a la página de la aplicación
response.redirect "pregunta.asp"
else
response.redirect "controlar.asp?errorusuario=si"
end if
'cierro la conexion con base de datos
Conn.Close
%>