<%call log_chk()%> <%if request("act")="1" then Set rs=Server.Createobject("Adodb.Recordset") sql="select * from adminx where adx_name='"&session("adminxxx")&"'" rs.open sql,conn,1,3 '添加日志 Set rslog=Server.Createobject("Adodb.Recordset") sql="select * from adminlog where adx_id="&rs("adx_id")&"" rslog.open sql,conn,1,3 if not rslog.eof then rslog("L_outT")=now() rslog.update end if rslog.close set rslog=nothing rs.close set rs=nothing session("adminxxx")="" response.Redirect("../index.asp") end if if request("act")="0" then Set rs=Server.Createobject("Adodb.Recordset") sql="select * from adminx where adx_name='"&session("adminxxx")&"'" rs.open sql,conn,1,3 '添加日志 Set rslog=Server.Createobject("Adodb.Recordset") sql="select * from adminlog where adx_id="&rs("adx_id")&" order by L_id desc" rslog.open sql,conn,1,3 if not rslog.eof then rslog("L_outT")=now() rslog.update end if rslog.close set rslog=nothing '---------------------------------- rs.close set rs=nothing session("adminxxx")="" response.Redirect("../index.asp") end if%>