📄 g_reply.asp

📁 java_blog是一个非常好的blog
💻 ASP
字号:
<%@LANGUAGE="VBScript" codepage="936"%>
<%
'**********************************************************
' zhuzhu 1.0 Free        Power by zgrq.com
' Email:ringsbot@163.com       OICQ：500985
' 网站: http://www.zgrq.com   演示：http://www.zgrq.com
'**********************************************************
if session("admin")<>"" and Request.Cookies("admin")<>"" then%>
<!--#include file="x_conn.asp"-->
<%
id=Request.QueryString("id")
set rs=server.createobject("adodb.recordset")
sql="select * from gbook where id="&id
rs.open sql,conn,2,3
%>
<html>
<head>
<meta http-equiv="Page-Exit" content="revealTrans(Duration=1.0,Transition=12)">
<link href="skin_1.css" rel="stylesheet" type="text/css">
<STYLE type="text/css">
body {
scrollbar-face-color: #EFEFEF;
scrollbar-shadow-color: #999999;
scrollbar-highlight-color: #999999;
scrollbar-3dlight-color: #FFFFFF;
scrollbar-darkshadow-color: #FFFFFF; 
scrollbar-track-color: #FFFFFF;
scrollbar-arrow-color: #999999;

}
.content {
	margin: 4px;
	padding: 4px;
	border: 1px dotted #999999;
	background-color: #006699;
	color: #FFCC00;
	text-decoration: blink;
}
</STYLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<table width="310" border="0" cellspacing="0">
  <tr> 
    <td><div align="center"><strong><font color="#006699">留言内容</font></strong></div></td>
  </tr>
  <tr>
    <td><table width="308" border="0" align="center" cellspacing="0">
        <tr>
          <td class=content><%=rs("content")%></td>
        </tr>
      </table></td>
  </tr>
</table>
<table width="310" border="0" cellspacing="0" cellpadding="2">
  <tr>
    <td><div align="center"><strong><font color="#006699"><br>
        管理员回复</font></strong></div></td>
  </tr>
  <tr>
    <td><table width="306" border="0" align="center" cellpadding="2" cellspacing="0">
        <tr>
          <td><form name="form1" method="post" action="">
              <textarea name="recontent" cols="48" rows="6" class="xndyk"><%=rs("recontent")%></textarea>
              <input type="submit" name="ok" value="提 交 回 复" class="xndyk">
            </form></td>
        </tr>
      </table></td>
  </tr>
</table>
</body>
</html>
<%
recontent=request("recontent")
rs("recontent")=recontent
if request("ok")<>"" then
rs.update
rs.close
set rs=nothing
response.redirect "g_index.asp"
end if
%>

<%
else
response.Redirect("a_admin.asp")
end if
'**********************************************************
' zhuzhu 1.0 Free        Power by zgrq.com
' Email:ringsbot@163.com       OICQ：500985
' 网站: http://www.zgrq.com   演示：http://www.zgrq.com
'**********************************************************
%>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -