exit.asp

来自「一套在线考试系统」· ASP 代码 · 共 32 行

<!--#include file="conn.asp"-->
<%
  Dim DT
  Dim userid
  Dim starttime

  userid=request.cookies("myuserid")
  starttime=request.cookies("mystarttime")
  
  sql="select * from tongji where userid="&userid&" and starttime='"&starttime&"'"
  rs.open sql,conn,3,2
  if not rs.eof then
    rs("online")=0
    DT=date()&" "&time()
    rs("endtime")=formatdatetime(DT)
    rs.update
  end if
  rs.close
  
  Response.Cookies("myuserid")=""
  Response.Cookies("myusername")=""
  Response.Cookies("mypwd")=""
  Response.Cookies("mydepartment")=""
  Response.Cookies("myoffice")=""
  Response.Cookies("myduties")=""
  Response.Cookies("myPOST")=""
  Response.Cookies("myrank")=""  
  session.abandon  
%>
<script language="javascript">
self.close();
</script>