📄 replan.asp

📁 blog 又搭工
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="UBBencode.ini"-->
<!--#include file="textencode.ini"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>回复</title>
<style type="text/css">
body{
margin:0px;
background-color:#FF9900;
}
#all{
width:780px;
margin-right:auto;
padding-left:10px;
}
form{
margin:0px;}
#title{
color:orange;
width:780px;
height:25px;
background-color:#FFFFFF;
text-align:center;
font-weight:bolder;
padding-top:5px;
font-size:24px;
}
#title_top{
	width:780px;
	height:30px;
	background-color:#FFFFFF;
	text-align:center;
	font-weight:bolder;
	padding-top:10px;
	border: 1px double #333333;
	color:orange;
}
#tools{
	width:780px;
	height:auto;
	background-color:#CCCCCC;
	text-align:left;
	font-weight:bolder;
	border: 1px solid #999999;
	padding-top:5px;
	padding-bottom:5px;
	FILTER:progid:DXImageTransform.Microsoft.Gradient(startColorStr='#ffffff', endColorStr='orange', gradientType='0'); 
	
}
#body{
	width:776px;
	height:auto;
	background-color:#ffffff;
	border: 1px solid #999999;
	padding-top:8px;
	padding-bottom:8px;}
#bottom{
	width:780px;
	height:auto;
	background-color:#ffffff;
	text-align:center;
	border: 1px solid #999999;
	padding-top:8px;
	padding-bottom:8px;
}
.btn{
	background-color:#FFFFFF;
	border: 1px solid #CCCCCC;
}
</style>
<script language="JAVASCRIPT">
		function check_Null(){
			if (document.form1.pass.value==""){
				alert("密码呢！输完哦!");
				return false;
			}
			if (document.form1.body.value==""){
				alert("一哈输完!");
				return false;
			}
		}
	</script>
<style type="text/css">
	.btn{
		background-color:#FFFFFF;
		border: 1px solid #CCCCCC;
}
</style>
</head>
<body text-align="center">
<form id="form1" name="form1" method="post" action="" onsubmit="javascript:check_Null();">
 <div id="tools">内容：<br/><textarea name="body" cols="60" rows="15" class="btn"></textarea>
 </div>
  <br /> 
  <div id="tools">
   回复密码：<input name="pass" type="password" class="btn" size="20" />
	<input name="Submit" type="submit" class="btn" value="回复我的计划"  />
	<input name="Submit" type="button" class="btn" value="关闭窗口" onclick="window.close();" /></div>
  <br />
</form>
<%
	'打开回复计划的密码
	strSql_pwd="Select planpwd From config"
	Set rspwd=db.Execute(strSql_pwd)	
%>

<%
	dim body,pass
	pass=request.form("pass")
	body=textencode(request.form("body"))
	if body<>"" and pass=rspwd("planpwd") then
		dim rs,strsql
		set rs=server.createobject("adodb.recordset")
		strsql="select * from planed"
		rs.open strsql,db,0,2
		rs.addnew		
		rs("body")=body
		rs("planid")=session("planid")
		planid=session("planid")
		rs.update
		response.write "<script>alert('回复成功!');</script>"
		response.write "<script>window.opener.location.href='show_plan.asp?planid="&session("planid")&"'</script>"
		response.write "<script>self.close();</script>"
	else
		response.end
	end if
	rs.close
	set rs=nothing
	set db=nothing
%>
<%
	rspwd.close
	set rspwd=nothing
%>
</body>
</html>
⌨️ 快捷键说明

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