| Para cambiar su contraseña sólo tiene que introducir en el campo clave la nueva contraseña. | ||||||
|
|
|
<%End if%> <%If request("ac")="cambioya" then%><% dim Conexio10,Tabl10 Set Conexio10=Server.CreateObject("adodb.connection") Set Tabl10=Server.CreateObject("adodb.recordset") Conexio10.Open "DSN=buscainmobiliarias" Tabl10.Open "administracion",Conexio10 test10="UPDATE administracion SET user='"&request("username")&"', clave='"&request("clave")&"'" conexio10.Execute(test10) %> Cambio de Claves Realizado <%End if%>
|
 |
