📄 quit.asp
字号:
<!--#include file="set.asp"-->
<%if loginfo=1 then%>
<!--#include file="conn.asp"-->
<%
Set cmdTemp = Server.CreateObject("ADODB.Command")
Set insert = Server.CreateObject("ADODB.Recordset")
cmdTemp.CommandText="SELECT * FROM loginfo WHERE userid='" &session("userid")& "' order by id desc"
cmdTemp.CommandType = 1
Set cmdTemp.ActiveConnection = conn
insert.Open cmdTemp, , 1, 3
insert("outtime")=now()
insert.update
if err.number<>0 then
response.write "数据库操作失败："&err.description
response.end
end if
set insert=nothing
set cmdTemp=nothing
set conn=nothing
%>
<%end if%>
<%session.abandon%>
<html>
<head>
<title>退出</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body bgcolor="#FFFFFF">
<table width="100%" border="0">
<tr>
<td>
<div align='center'>您 已 经 正 常 退 出 ！ 再 见 ！</div>
</td>
</tr>
<tr>
<td>
<div align="center">为了论坛帖子的安全，请您在管理后正常退出。</div>
</td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td>
<div align="center"><a href="default.asp" title="进入论坛">＞ ＞ 进 入 论 坛 ＜ ＜</a></div>
</td>
</tr>
<tr>
<td>
<div align="center"><a href="login.asp" title="重新登录">＞ ＞ 重 新 登 录 ＜ ＜</a></div>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -