<%if session("usr")<>0 then if (Request.Form <>"") Then rsusr.open "select * from usuarios where codusr="&request.querystring("codusr") ,conn ,adOpenKeyset ,adLockOptimistic if request.form("nombreusr")<>"" then rsusr("nombreusr")=request.form("nombreusr") if request.form("apellido1usr")<>"" then rsusr("apellido1usr")=request.form("apellido1usr") if request.form("sexo")<>"" then rsusr("sexo")=request.form("sexo") if request.form("login")<>"" then rsusr("login")=request.form("login") if request.form("passw")<>"" then rsusr("passw")=request.form("passw") rsusr.update rsusr.close response.redirect("usuarios.asp") end if rsusr.open "select * from usuarios where codusr="&request.querystring("codusr") ,conn ,adOpenKeyset ,adLockOptimistic %>
Biblioteca
" name="usuariomod">

Modificar Datos

Nombre: 

Apellido: 

Sexo:  <%if rsusr("sexo")="M" then%> Mujer Hombre

<%else%> Mujer Hombre

<%end if%>

Login: 

Contraseņa: 


<%else response.redirect("salir.asp") end if%>