📄 oper.asp
字号:
<!--#Include file="../Common/Inc_DatConn.asp"-->
<!--#Include file="Common/Inc_Config.asp"-->
<!--#Include file="Common/Inc_Function.asp"-->
<%
'┌─ 风云ASP在线 ────────────────────────┐
'│ │
'│ 作者：赵振波. http://www.fyasp.com │
'│ │
'│ Q Q：176189168 │
'│ │
'│ Email：fy96@163.com │
'│ │
'│ 程序定做，系统开发，网站制作，提供高质量的网络产品、技术和服务！│
'│ │
'│【版权声明】 │
'│ │
'│ 本程序版权归坐看风云所有，未经授权擅自修改、复制或散布本程序│
'│ │
'│的部分或全部，将承受严厉的民事和刑事处罚，对已知的违反者将给予法 │
'│ │
'│律范围内的全面制裁。对非法使用此程序所造成的一切后果本人概不负责!│
'│ │
'└─────────────────── http://www.fyasp.com ──┘
%>
<%if IsTimeOut(Session("strAccount"),Session("strPassWord")) then Response.Redirect "index.asp"%>
<html>
<head>
<title><% = strSiteName%> - 网站后台管理系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="Common/Site.css" type="text/css">
<style>
TABLE {BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 1px; }
TD {BORDER-RIGHT: 0px; BORDER-TOP: 0px;}
</style>
</head>
<body topmargin="1" leftmargin="1">
<table border="0" width="100%" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="100%" class="booktable">
<%if UCase(Request.QueryString("Oper")) = "ADDCOUNT" then '/编辑会员,即会员点数管理/
Response.Write "<title>会员点数管理</title>"%>
<script language="javascript">
<!-- Begin validation form script
//检验表单的合法性
function FeedBack() {
if (document.AddCount.Add.value == "#") {
alert("\请选择是增加还是减少点数！");
document.AddCount.Add.focus();
}
else if (document.AddCount.UpdateCount.value == "") {
alert("\点数不能为空！");
document.AddCount.UpdateCount.focus();
}
else {
return true;
}
return false;
}
// End of validation form script -->
</script>
<form method="post" action="DataDeal.asp" name="AddCount" OnSubmit="return FeedBack()">
<input type="hidden" name="Oper" value="AddCount">
<input type="hidden" name="ID" value="<% = Request.QueryString("ID")%>">
<table cellSpacing="1" cellPadding="0" width="100%" class="booktable" border="0" align="center">
<tr>
<td width="100%" colspan="2" height="35" class="bottom" align="center">会 员 点 数 管 理</font></td>
</tr>
<tr>
<td width="30%" height="25" align="right" bgcolor="#FFFFFF">增加/减少：</td>
<td width="70%" height="25" bgcolor="#FFFFFF">
<select size="1" name="Add" class="face">
<option value="#" selected>-选择-</option>
<option value="0">增加</option>
<option value="1">减少</option>
</select>
</td>
</tr>
<tr>
<td width="30%" height="25" align="right" bgcolor="#FFFFFF">更改点数：</td>
<td width="70%" height="25" bgcolor="#FFFFFF"> <input type="text" name="UpdateCount" size="9" class="face" onKeyUp="this.value=this.value.replace(/\D/gi,'')" maxlength="8"></td>
</tr>
<tr>
<td width="30%" height="25" align="right" bgcolor="#FFFFFF">备注：</td>
<td width="70%" height="25" bgcolor="#FFFFFF"> <textarea rows="3" name="Remark" cols="27" maxlength="100" class="face"></textarea></td>
</tr>
<tr>
<td width="100%" height="35" colspan="2" align="center" bgcolor="#FFFFFF"><input type="submit" value="更 新" name="Submit1" class="button"> <input onclick="parent.location.href='javascript:close();'" type="button" value="关 闭" class="button" name="button1"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "ADDPHOTO" then '/添加新闻相关图片/
Response.Write "<title>添加图片</title>"%>
<table cellSpacing="1" cellPadding="0" width="100%" class="booktable" border="0" align="center">
<tr>
<td width="100%" height="35" class="bottom" align="center">添 加 图 片</font></td>
</tr>
<form name="form7" method="post" action="FileUpLoad.asp" enctype="multipart/form-data">
<input type="hidden" name="Oper" value="AddPhoto">
<input type="hidden" name="FilePath" value="<% = strUploadNewsPhotoUrl%>">
<tr>
<td width="100%" align="center" height="72" bgcolor="#FFFFFF"><input type="file" name="file1" class="face"></td>
</tr>
<tr>
<td width="100%" height="35" align="center" bgcolor="#FFFFFF"><input type="submit" value="确 定" name="Submit20" class="button"> <input onclick="parent.location.href='javascript:close();'" type="button" value="关 闭" class="button" name="button20"></td>
</tr>
</form>
</table>
<%elseif Request("Oper")= "setjb" then '/会员级别设置/
Response.Write "<title>会员级别设置</title>"%>
<form method="post" action="DataDeal.asp" name="setjb">
<input type="hidden" name="Oper" value="setjb">
<input type="hidden" name="ID" value="<% = Request.QueryString("ID")%>">
<table cellSpacing="1" cellPadding="0" width="100%" class="booktable" border="0" align="center">
<tr>
<td width="100%" colspan="2" height="35" class="bottom" align="center">会 员 级 别 管 理</font></td>
</tr>
<tr>
<td width="30%" height="25" align="right" bgcolor="#FFFFFF">会员级别：</td>
<td width="70%" height="25" bgcolor="#FFFFFF">
<select size="1" name="jb" class="face">
<option value="0">普通会员</option>
<option value="1">高级会员</option>
</select>
</td>
</tr>
<tr>
<td width="100%" height="35" colspan="2" align="center" bgcolor="#FFFFFF"><input type="submit" value="更 新" name="Submit1" class="button"> <input onclick="parent.location.href='javascript:close();'" type="button" value="关 闭" class="button" name="button1"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "LOCKMEMBER" then '/关闭会员/
Response.Write "<title>关闭会员</title>"%>
<form method="post" action="DataDeal.asp" name="form4">
<input type="hidden" name="Oper" value="LockMember">
<input type="hidden" name="ID" value="<% = Request.QueryString("ID")%>">
<table cellSpacing="1" cellPadding="0" width="100%" class="booktable" border="0" align="center">
<tr>
<td width="100%" height="35" class="bottom" align="center">关 闭 会 员</font></td>
</tr>
<tr>
<td width="100%" align="center" height="72" bgcolor="#FFFFFF">真的要关闭该会员么？</td>
</tr>
<tr>
<td width="100%" height="35" align="center" bgcolor="#FFFFFF"><input type="submit" value="确 定" name="Submit2" class="button"> <input onclick="parent.location.href='javascript:close();'" type="button" value="关 闭" class="button" name="button2"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "UNLOCKMEMBER" then '/开启会员/
Response.Write "<title>开启会员</title>"%>
<form method="post" action="DataDeal.asp" name="form5">
<input type="hidden" name="Oper" value="UnLockMember">
<input type="hidden" name="ID" value="<% = Request.QueryString("ID")%>">
<table cellSpacing="1" cellPadding="0" width="100%" class="booktable" border="0" align="center">
<tr>
<td width="100%" height="35" class="bottom" align="center">开 启 会 员</font></td>
</tr>
<tr>
<td width="100%" align="center" height="72" bgcolor="#FFFFFF">真的要开启该会员么？</td>
</tr>
<tr>
<td width="100%" height="35" align="center" bgcolor="#FFFFFF"><input type="submit" value="确 定" name="Submit3" class="button"> <input onclick="parent.location.href='javascript:close();'" type="button" value="关 闭" class="button" name="button3"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "TJ" then '/设为推荐信息/
Response.Write "<title>推 荐 信 息</title>"%>
<form method="post" action="DataDeal.asp" name="form4p5">
<input type="hidden" name="Oper" value="tj">
<input type="hidden" name="ID" value="<% = Request.QueryString("ID")%>">
<table cellSpacing="1" cellPadding="0" width="100%" class="booktable" border="0" align="center">
<tr>
<td width="100%" height="35" class="bottom" align="center">推 荐 信 息</font></td>
</tr>
<tr>
<td width="100%" align="center" height="72" bgcolor="#FFFFFF">真的要将此信息<font color="#FF0000">设为</font>推荐吗？</td>
</tr>
<tr>
<td width="100%" height="35" align="center" bgcolor="#FFFFFF"><input type="submit" value="确 定" name="Submit3" class="button"> <input onclick="parent.location.href='javascript:close();'" type="button" value="关 闭" class="button" name="button3"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "QXTJ" then '/设为推荐信息/
Response.Write "<title>推 荐 信 息</title>"%>
<form method="post" action="DataDeal.asp" name="form4wp5">
<input type="hidden" name="Oper" value="qxtj">
<input type="hidden" name="ID" value="<% = Request.QueryString("ID")%>">
<table cellSpacing="1" cellPadding="0" width="100%" class="booktable" border="0" align="center">
<tr>
<td width="100%" height="35" class="bottom" align="center">取 消 推 荐 信 息</font></td>
</tr>
<tr>
<td width="100%" align="center" height="72" bgcolor="#FFFFFF">真的要<font color="#FF0000">取消</font>对此信息的推荐吗？</td>
</tr>
<tr>
<td width="100%" height="35" align="center" bgcolor="#FFFFFF"><input type="submit" value="确 定" name="Submit3" class="button"> <input onclick="parent.location.href='javascript:close();'" type="button" value="关 闭" class="button" name="button3"></td>
</tr>
</form>
</table>
<%elseif UCase(Request("Oper")) = "DELWSINFO7" then '/删除所有未审信息/
Response.Write "<title>删除所有未审信息</title>"%>
<table cellSpacing="1" cellPadding="0" width="100%" class="booktable" border="0" align="center">
<tr>
<td width="100%" height="35" class="bottom" align="center"><b>
<font color="#FFFF00">删除所有未审信息</font></font></b></td>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -