<% conectar() valor=0 Sql = "SELECT count(*) as son FROM usuarios WHERE usuario='"&request.Form("user")&"' and contrasena='"&request.Form("pwd")&"'" rs.Open Sql, Conn valor=rs("son") rs.movenext rs.close if (valor=1) then Session("trabajos")=true response.Redirect("trabajospresentados.asp") else response.Redirect("trabajoscientificos.asp?err=1") Session.Abandon() end if %>