LogOut.asp 1.1 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546
  1. <META http-equiv=Content-Type content="text/html; charset=utf-8">
  2. <!--#include file="connxyz.asp"-->
  3. <%call log_chk()%>
  4. <%if request("act")="1" then
  5. Set rs=Server.Createobject("Adodb.Recordset")
  6. sql="select * from adminx where adx_name='"&session("adminxxx")&"'"
  7. rs.open sql,conn,1,3
  8. '添加日志
  9. Set rslog=Server.Createobject("Adodb.Recordset")
  10. sql="select * from adminlog where adx_id="&rs("adx_id")&""
  11. rslog.open sql,conn,1,3
  12. if not rslog.eof then
  13. rslog("L_outT")=now()
  14. rslog.update
  15. end if
  16. rslog.close
  17. set rslog=nothing
  18. rs.close
  19. set rs=nothing
  20. session("adminxxx")=""
  21. response.Redirect("../index.asp")
  22. end if
  23. if request("act")="0" then
  24. Set rs=Server.Createobject("Adodb.Recordset")
  25. sql="select * from adminx where adx_name='"&session("adminxxx")&"'"
  26. rs.open sql,conn,1,3
  27. '添加日志
  28. Set rslog=Server.Createobject("Adodb.Recordset")
  29. sql="select * from adminlog where adx_id="&rs("adx_id")&" order by L_id desc"
  30. rslog.open sql,conn,1,3
  31. if not rslog.eof then
  32. rslog("L_outT")=now()
  33. rslog.update
  34. end if
  35. rslog.close
  36. set rslog=nothing
  37. '----------------------------------
  38. rs.close
  39. set rs=nothing
  40. session("adminxxx")=""
  41. response.Redirect("../index.asp")
  42. end if%>