📄 delonline.asp
字号:
<!--#include file="./public/wxl_conn.asp"-->
<%
'////////////////////////
'///文件名:logout.asp //
'///说明:非正常退出处理 ///
'////////////////////////
response.expires = 0
wxl=request("wxl")
if wxl="" then
ShowHtml()
elseif wxl="Del" then
LoginName=request("LoginName")
Password=request("Password")
Query="Select str_sOperName,str_sOperLoginPwd from web_SysOperators,Web_SysOnline where int_sOperID=int_sOleUserID and str_sOleLoginName='"&LoginName&"'"
set sql=conn.Execute(Query)
if sql.eof then Back("对不起，您所输入的帐号没有人在使用！")
if sql("str_sOperLoginPwd")<>Encrypt(Password) then Back("对不起，您输入的密码错误，操作失败！")
conn.Execute("delete from Web_SysOnline where str_sOleLoginName='"&LoginName&"'")
%>
<script language='javascript'>
alert('操作成功，您现在可以正常登录了！');
window.close();
</script>
<%
response.end
end if
sub ShowHtml()
%>
<html>
<head>
<title>非正常退出处理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="js/style.css" type="text/css">
<SCRIPT language=JavaScript>
<!--
function checkvalue() {
aa=document.form1
if (aa.LoginName.value=="") {
window.alert ("请输入用户名!"); aa.LoginName.focus();return false}
if (aa.Password.value=="") {
window.alert ("请输入密码!"); aa.Password.focus();return false}
}
//-->
</SCRIPT>
</head>
<CENTER>
<%HtmlHead("非正常退出处理")%>
<table width="300" border="0" cellspacing="1" cellpadding="3" align="center" bgcolor="#666666">
<FORM METHOD=POST NAME=form1 ACTION="" onSubmit="return checkvalue()">
<tr bgcolor="#FFFFFF">
<td width=60>用 户 名：</td>
<td><INPUT TYPE="text" NAME="LoginName" size=30></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width=60>密 码：</td>
<td><INPUT TYPE="password" NAME="Password" size=30></td>
</tr>
<tr bgcolor=#ffffff>
<td valign=top width=60>说 明：</td>
<td>本程序是用来处理在上次操作过程中非正常退出后台管理系统</td>
</tr>
</table>
<table border="0" width="100%" cellspacing="0" cellpadding="0" bgcolor="#D6D3CE">
<tr>
<td height="6"></td>
</tr>
<tr>
<td height="2" align="center">
<input type="submit" value=" 确 定" name="B1" class="submit" style="width:60; height:25;">
<input type="reset" value=" 取 消" name="B2" class="submit" style="width:60; height:25;" onClick="window.close();"></td>
</tr>
<tr>
<td height="6"></td>
</tr>
</table>
<input type=hidden name="wxl" value="Del">
</FORM>
<%
HtmlEnd
end sub
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -