?? admin_post.asp
字號(hào):
<!--#include file="conn.asp"-->
<!--#include file=const.asp -->
<%
if not theUser.master then
connclose()
response.redirect ("index.asp")
end if
dim xxid, exec, rs
xxid=encodestr(request("id"))
if xxid="" then
connclose()
session("errmsg")="非法操作!!!"
response.redirect "admin_error.asp"
end if
exec="select * from ly where id=" + CStr(xxid) + " "
Set RS = Server.CreateObject("ADODB.RecordSet")
rs.Open exec, Conn, 1, 1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=sitetitle%></title>
<META name="Author" content="木鳥(niǎo)">
<link rel="stylesheet" href="style/<%=skin%>.css" type="text/css">
</head>
<body>
<!--#include file="head.asp"-->
<br>
<script>
function check()
{
if (document.form1.act.value=="")
{
alert("你想干什么?你到是說(shuō)呀!");
document.form1.act.focus();
return false;
}
return true;
}
</script>
<table border="0" width="400" cellspacing="0" cellpadding="10" bordercolorlight="#000000" bordercolordark="#FFFFFF" align="center" class="table004">
<tr>
<td class="table001" align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<form method="POST" action="admin_post_do.asp" name="form1">
<table border="0" width="100%" cellspacing="0" cellpadding="3" >
<tr>
<td width="100%" align="center" colspan="3"><b><font color="#FF0000">
— — 留 言 管 理 — —</font></b></td>
</tr>
<tr>
<td width="20%" align="center">文章標(biāo)題:</td>
<td width="51%"><%=rs("title")%></td>
<td width="35%">作者:<%=rs("name")%></td>
</tr>
<tr>
<td width="20%" align="center">斑竹動(dòng)作:</td>
<td width="80%" colspan="2">
<select size="1" name="act" class="input1" >
<option value="" selected>— —選擇動(dòng)作— —</option>
<option value="del">刪除留言</option>
<option value="best">
<%if rs("jh")=1 then response.write "取消精華" else response.write "推薦精華" end if %>
</option>
<% if rs("rt")=0 then %>
<option value="top">
<%if rs("istop")=1 then response.write "取消固頂" else response.write "固頂留言" end if %>
</option>
<option value="lock">
<%if rs("islock") then response.write "取消鎖定" else response.write "鎖定留言" end if %>
</option>
<% end if %>
</select>
</td>
</tr>
<tr>
<td width="106%" align="center" colspan="3">
</td>
</tr>
<tr>
<td width="100%" colspan="3">
<p align="center">
<input type="submit" value="提交" name="B1" onclick="return check()" class="input2" >
<input type="reset" value="清除" name="B2" class="input2" >
<br>
<input type="hidden" name="tname" size="17" style="background-color: #FFCC00; border-style: solid; border-width: 1" value="<%=rs("name")%>">
<input type="hidden" name="id" size="17" style="background-color: #FFCC00; border-style: solid; border-width: 1" value="<%=xxid%>">
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
::: <a href="index.asp">返 回 留 言 首 頁(yè) 面</a> :::<br>
</td>
</tr>
</table>
<!--#include file="foot.asp"-->
</body>
</html>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -