📄 admin_zhl_shu.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
if request.Cookies("user")<>"管理员" then
response.Write("未知来源！请先登陆！")
response.End()
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title><base onmouseover="window.status='欢迎使用有L.Y.Z开发的学生社团管理网络平台';return true"><LINK href="all.css" rel=StyleSheet type=text/css>
</head>
<body>
<table width="100%" border="1" cellspacing="0" bordercolor="#009900">
<tr bgcolor="#B1DB99">
<td width="32%">两种整理方式：</td>
<td width="64%"> </td>
</tr>
<tr bgcolor="#cbe6b9" >
<td align="right">一、整理全部数据：</td>
<td align="center">
<input type="button" value="整理全部数据" onclick=" window.location='admin_zhl_shuok.asp'" style="font-family: 新细明体, 宋体, Arial; font-size: 9pt; height:20px;background-color:#D4D0C8;" onMouseOver ="this.style.backgroundColor='#FFC864'" onMouseOut ="this.style.backgroundColor='#D4D0C8'">
</td>
</tr>
<tr bgcolor="#E7FDE3">
<td> </td>
<td> </td>
</tr>
<tr bgcolor="#cbe6b9">
<td align="right">二、清理部分数据：</td>
<td>输入日期：（格式如：1983-08-17） <font color="#FF0000">建议</font>删除前先<a href="admin_bf_shu.asp">备份数据库</a></td>
</tr><form name="form1" method="post" action="admin_del_shu.asp">
<tr bgcolor="#E7FDE3">
<td> </td>
<td align="center">
<input name="txtdate" type="text" id="txtdate" value="0000-00-00" size="10" maxlength="10">
</td>
</tr>
<tr bgcolor="#E7FDE3">
<td> </td>
<td align="center"> <input name="cmdOk" type="button" id="cmdOk" value="删除所填日期以前的所有用户资料" style="font-family: 新细明体, 宋体, Arial; font-size: 9pt; height:20px;background-color:#D4D0C8;" onMouseOver ="this.style.backgroundColor='#FFC864'" onMouseOut ="this.style.backgroundColor='#D4D0C8'"></td>
</tr> </form>
</table>
</body>
</html>
<script language="VBScript">
sub cmdok_onClick
if form1.txtdate.value="" then
alert "请输入日期！"
else
call form1.submit()
end if
end sub
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -