📄 gbook.asp
字号:
<!--#include file="config.asp"-->
<!--#include file="chkuser.asp"-->
<!--#include file="inc/user.asp"-->
<!--#include file="mytop.asp"-->
<script language=javascript>
function manage(url)
{
window.open('manage.asp','manage','fullscren=yes');
}
</script>
<%
if rshost("gbook")=False then WriteErrMsg("您没有权限使用此功能！")
username=Request.Cookies("9cool_username")
sql="select * from [gbuser] where username='"&username&"'"
rs.open sql,conn,1,3
if rs.eof and rs.bof then
rs.addnew
rs("username")=username
rs("sitename")=rsuser("sitename")
rs.update
elseif request("action")="edit" then
rs("uphtml")=request.Form("uphtml")
rs("downhtml")=request.Form("downhtml")
rs("state")=request.Form("state")
rs.update
response.write "<script language=javascript>alert('修改成功！');location.href='gbook.asp'</script>"
rs.close
set rs=nothing
end if
%>
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/user.css" rel="stylesheet" type="text/css">
<title></title>
</head>
<body>
<table width=778 align="center" cellpadding=4 cellspacing=1 class="a2">
<form name="form1" action="?action=edit" method="post" onSubmit="javascript:form1.Submit.disabled=true;">
<tr align="center" class="a1">
<td height="25" colspan="2">留言本管理</td>
</tr>
<tr class="a3">
<td colspan="2"><p>提示：<br>
1.请在您网站加上此留言本的链接<br>
2.需要回复或删除留言，必须先登录用户管理中心</p> </td>
</tr>
<tr class="a4">
<td>网站名称：</td>
<td><%=rs("sitename")%></td>
</tr>
<tr class="a4">
<td>留言本地址：</td>
<td width="331"><a href="gbook/index.asp?username=<%=Request.Cookies("9cool_username")%>" target="_blank">按此打开您的留言本</a></td>
</tr>
<tr class="a3">
<td>留言本顶部html：</td>
<td><textarea name="uphtml" cols="60" rows="4"><%=rs("uphtml")%></textarea></td>
</tr>
<tr class="a4">
<td width="102">留言本底部html：</td>
<td><textarea name="downhtml" cols="60" rows="4" id="textarea"><%=rs("downhtml")%></textarea></td>
</tr>
<tr class="a3">
<td>留言本开关</td>
<td><input type="radio" name="state" value="True" <%if rs("state")=True then response.write "checked"%>>
打开
<input type="radio" name="state" value="False" <%if rs("state")=False then response.write "checked"%>>
关闭 </td>
</tr>
<tr class="a4">
<td>开通日期：</td>
<td><%=formatdatetime((rs("date")),1)%></td>
</tr>
<tr align="center" class="a3">
<td colspan="2"><input name="Submit" type="submit" value="提交"></td>
</tr></form>
</table>
<!--#include file="links.asp"-->
<!--#include file="bottom.asp"-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -