?? oper.asp
字號(hào):
<!--#Include file="../Common/Inc_DatConn.asp"-->
<!--#Include file="Common/Inc_Config.asp"-->
<!--#Include file="Common/Inc_Function.asp"-->
<%
'┌─ 風(fēng)云ASP在線 ────────────────────────┐
'│ │
'│ 作者：趙振波. http://www.fyasp.com │
'│ │
'│ Q Q：176189168 │
'│ │
'│ Email：fy96@163.com │
'│ │
'│ 程序定做，系統(tǒng)開(kāi)發(fā)，網(wǎng)站制作，提供高質(zhì)量的網(wǎng)絡(luò)產(chǎn)品、技術(shù)和服務(wù)！│
'│ │
'│【版權(quán)聲明】 │
'│ │
'│ 本程序版權(quán)歸坐看風(fēng)云所有，未經(jīng)授權(quán)擅自修改、復(fù)制或散布本程序│
'│ │
'│的部分或全部，將承受嚴(yán)厲的民事和刑事處罰，對(duì)已知的違反者將給予法 │
'│ │
'│律范圍內(nèi)的全面制裁。對(duì)非法使用此程序所造成的一切后果本人概不負(fù)責(zé)!│
'│ │
'└─────────────────── http://www.fyasp.com ──┘
%>
<%if IsTimeOut(Session("strAccount"),Session("strPassWord")) then Response.Redirect "index.asp"%>
<html>
<head>
<title><% = strSiteName%> - 網(wǎng)站后臺(tái)管理系統(tǒng)</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 '/編輯會(huì)員,即會(huì)員點(diǎn)數(shù)管理/
Response.Write "<title>會(huì)員點(diǎn)數(shù)管理</title>"%>
<script language="javascript">
<!-- Begin validation form script
//檢驗(yàn)表單的合法性
function FeedBack() {
if (document.AddCount.Add.value == "#") {
alert("\請(qǐng)選擇是增加還是減少點(diǎn)數(shù)！");
document.AddCount.Add.focus();
}
else if (document.AddCount.UpdateCount.value == "") {
alert("\點(diǎn)數(shù)不能為空！");
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">會(huì) 員 點(diǎn) 數(shù) 管 理</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">更改點(diǎn)數(shù)：</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="關(guān) 閉" class="button" name="button1"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "ADDPHOTO" then '/添加新聞相關(guān)圖片/
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="關(guān) 閉" class="button" name="button20"></td>
</tr>
</form>
</table>
<%elseif Request("Oper")= "setjb" then '/會(huì)員級(jí)別設(shè)置/
Response.Write "<title>會(huì)員級(jí)別設(shè)置</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">會(huì) 員 級(jí) 別 管 理</font></td>
</tr>
<tr>
<td width="30%" height="25" align="right" bgcolor="#FFFFFF">會(huì)員級(jí)別：</td>
<td width="70%" height="25" bgcolor="#FFFFFF">
<select size="1" name="jb" class="face">
<option value="0">普通會(huì)員</option>
<option value="1">高級(jí)會(huì)員</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="關(guān) 閉" class="button" name="button1"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "LOCKMEMBER" then '/關(guān)閉會(huì)員/
Response.Write "<title>關(guān)閉會(huì)員</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">關(guān) 閉 會(huì) 員</font></td>
</tr>
<tr>
<td width="100%" align="center" height="72" bgcolor="#FFFFFF">真的要關(guān)閉該會(huì)員么？</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="關(guān) 閉" class="button" name="button2"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "UNLOCKMEMBER" then '/開(kāi)啟會(huì)員/
Response.Write "<title>開(kāi)啟會(huì)員</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">開(kāi) 啟 會(huì) 員</font></td>
</tr>
<tr>
<td width="100%" align="center" height="72" bgcolor="#FFFFFF">真的要開(kāi)啟該會(huì)員么？</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="關(guān) 閉" class="button" name="button3"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "TJ" then '/設(shè)為推薦信息/
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">設(shè)為</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="關(guān) 閉" 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>對(duì)此信息的推薦嗎？</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="關(guān) 閉" class="button" name="button3"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "FYTOP" then '/信息置頂/
Response.Write "<title>信息置頂</title>"%>
<form method="post" action="DataDeal.asp" name="formt">
<input type="hidden" name="Oper" value="fytop">
<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="關(guān) 閉" class="button" name="button3"></td>
</tr>
</form>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "NOFYTOP" then '/取消置頂信息/
Response.Write "<title>取消信息置頂</title>"%>
<form method="post" action="DataDeal.asp" name="formt1">
<input type="hidden" name="Oper" value="nofytop">
<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>對(duì)此信息的置頂嗎？</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="關(guān) 閉" 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>
</tr>
<tr>
<td width="100%" align="center" height="72" bgcolor="#FFFFFF">
<u><b>
<font color="#FF0000">免費(fèi)版不提供此功能？</font></b></u></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="關(guān) 閉" class="button" name="button3"></td>
</tr>
</table>
<%elseif UCase(Request("Oper")) = "DELGQINFO" then '/刪除所有過(guò)期信息/
Response.Write "<title>刪除所有過(guò)期信息</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 color="#FFFF00">刪除所有過(guò)期信息</font></font></td>
</tr>
<tr>
<td width="100%" align="center" height="72" bgcolor="#FFFFFF">
<b><u>
<font color="#FF0000">免費(fèi)版不提供此功能？</font></u></b></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="關(guān) 閉" class="button" name="button3"></td>
</tr>
</table>
<%elseif UCase(Request.QueryString("Oper")) = "DELMEMBER" then '/刪除會(huì)員/
Response.Write "<title>刪除會(huì)員</title>"%>
<form method="post" action="DataDeal.asp" name="form6">
<input type="hidden" name="Oper" value="DelMember">
<input type="hidden" name="ID" value="<% = Request.QueryString("ID")%>">
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -