我是后台管理员,我想重新设置学员的登录密码,然后让学员以我修改过的密码登录进行网上考试,这应该怎么做啊

解决方案 »

  1.   

    update 用户表 set  密码=新密码 where 条件
      

  2.   

    <!--#include file="../eogetip.asp"-->
    <!--#include file="stuinc/md5.asp"-->
    <!--#include file="../eoConn.asp"--><%
    eoIP=geteoIP
    eoTime=Now()
    eoName=Trim(Request("Id"))
    eoName=Replace(eoName,"'","''")
    eoName=Lcase(eoName)
    eoPwd=Trim(Request("Pwd"))
    if eoName="" or eoPwd="" then response.Redirect("index.asp")

    set rs=server.CreateObject("ADODB.Recordset")
    If eoName <> "" Then sql="SELECT * FROM V_N_StuInfo WHERE (eoStuId='" &eoName& "') AND (eoStuPwd='"&eoPwd&"') AND eoStuAvailable='1'" 
        'response.Write(sql)
    'response.End()
    rs.Open sql,conn,1,3
        If Not rs.EOF Then
    session("eo_StuIP")=eoIP
    session("eo_StuTime")=eoTime
    session("eo_StuId")=Trim(rs("eoStuId"))
    session("eo_StuName")=Trim(rs("eoStuName"))
    session("eo_StuXYJB0201")=Trim(rs("eoXYJB0201"))
    session("eo_StuXYJB0202")=Trim(rs("eoXYJB0202"))
    session("eo_StuDEP0201")=Trim(rs("eoDEP0201"))
    session("eo_StuDEP0202")=Trim(rs("eoDEP0202"))
    session("eo_StuDZZ0201")=Trim(rs("eoDZZ0201"))
    session("eo_StuDZZ0202")=Trim(rs("eoDZZ0202"))

    set rs1=server.CreateObject("ADODB.Recordset")
    sql1="Update N_StuInfo set eoStuOnline='1' where eoStuId='"&eoName&"'"
    'response.Write(sql1)
    rs1.open sql1,conn,1,3
    set rs1=nothing

    '设置Stu用户为在线状态
    sql_Login="Update N_StuInfo set eoStuOnline='1',eoStuLoginDate='"&Now()&"' where eoStuId='"&Trim(rs("eoStuId"))&"'"
    conn.execute(sql_Login)

    set rs=nothing
    conn.close
    set conn=nothing
        'response.Write("aaa")
        'response.End()
    response.Redirect("manage.asp?eoerrorstr="&eoName&"-登录成功!")
      else
    set rs=nothing
    conn.close
    set conn=nothing
    response.Redirect("../index.asp?eoerrorstr="&eoName&"-登录失败!")
    end if
    %>