<%
user_id=checkstr(session("m_id"),1)
user_name=checkstr(session("m_user"),2)
if checkstr(request("cmd"),2)="exit" and session("m_id")>0 then
if session("m_id")>0 then
Set rs = Server.CreateObject("ADODB.Recordset")
SQL="update edu_userinfo set logtime=getdate()-0.1 where id="&session("m_id")&""
rs.Open SQL,conn,3
end if
session("m_user")=""
session("m_pwd")=""
session("m_id")=""
session("m_r_name")=""
session("m_login")=""
Session.Contents.Remove("m_user")
Session.Contents.Remove("m_pwd")
Session.Contents.Remove("m_id")
session.Contents.Remove("m_r_name")
session.Contents.Remove("m_login")
Session("user_id")=""
Session("username")=""
Session("password")=""
Session.Contents.Remove("user_id")
Session.Contents.Remove("username")
Session.Contents.Remove("password")
end if
%>
面授班报名
<%if checkstr(request("exam"),2)="exam" then%>
<%end if%>
<%=user_name%> 你好!欢迎光临面授课程报名系统!请选择你需要的课程! <%if user_id>0 then response.Write("我要退出")%>