📄 gl.asp
字号:
<!--#include file="data.asp"-->
<%
dim xxid, exec, rs
xxid=encodestr(request("id"))
if xxid="" then
connclose()
session("errmsg")="非法操作！！！"
response.redirect "glerror.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>:: 永久的回忆 ::</title>
<link rel="stylesheet" href="style/<%=skin%>.css" type="text/css">
</head>
<body>
<!--#include file="head.asp"-->
<br>
<script>
function check()
{
if (document.form1.dz.value=="x")
{
alert("你想干什么？你到是说呀！");
document.form1.dz.focus();
return false;
}
<% if session("bz")<>"bz" then %>
if (document.form1.name.value=="")
{
alert("你是谁？是大老虎么？");
document.form1.name.focus();
return false;
}
if (document.form1.pass.value=="")
{
alert("不管真假总要有个通行证！");
document.form1.pass.focus();
return false;
}
<% end if %>
if (document.form1.dz.value=="e")
{
document.form1.action="edit.asp";
}
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="glcl.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">文章标题：</td>
<td width="51%"><%=rs("title")%></td>
<td width="35%">作者：<%=rs("name")%></td>
</tr>
<tr>
<td width="20%" align="center">斑竹动作：</td>
<td width="80%" colspan="2">
<select size="1" name="dz" class="input1" >
<option value="x" selected>— —选择动作— —</option>
<option value="e">编辑留言</option>
<option value="s">删除留言</option>
<option value="j">
<%if rs("jh")=1 then response.write "取消精华" else response.write "推荐精华" end if %>
</option>
</select>
</td>
</tr>
<tr>
<td width="106%" align="center" colspan="3">
<% if session("bz")<>"bz" then %>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td>
<p align="right">管理员帐号：
</td>
<center>
<center>
<td>
<input type="text" name="name" size="17" class="input1" value="<%=request.cookies("gbook")("username")%>" >
</td>
</center>
</center>
<td>
<p align="right">管理员密码：
</td>
<td>
<input type="password" name="pass" size="17" class="input1" value="<%=request.cookies("gbook")("password")%>" >
</td>
</tr>
</table>
<% end if %>
</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">返 回 留 言 首 页 面</a> ：：：<br>
</td>
</tr>
</table>
<!--#include file="tj.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -