📄 modifyplan.asp
字号:
<!--#include file="check.asp"-->
<!--#INCLUDE FILE="connect.asp" -->
<html>
<head>
<title>个人安排</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="outplan.css" type="text/css">
</head>
<script language="javascript" src="apply.js">
</script>
<%if Request.ServerVariables("Request_Method")="POST" then
set rs=server.createobject("adodb.recordset")
if request("choose")="1" then
sql="select * from personplan where uid='"&session("uid")&"' and id="&CLng(request("id"))
rs.Open sql,conn,1,3
if rs.eof then
response.redirect "error.htm"
response.end
end if
rs("content")=request("content")
rs("plandate")=request("dodate")
rs("plantime")=request("hourtext")&request("minutetext")
rs("remindtime")=request("remindhour")&request("remindminute")
rs("remind")="0"
rs("bz")=request("bz")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write("<script>opener.location=opener.location;window.close()</script>")
response.end
end if
if request("choose")="2" then
sql="delete from personplan where uid='"&session("uid")&"' and id="&CLng(request("id"))
conn.execute(sql)
conn.close
set conn=nothing
response.write("<script>opener.location=opener.location;window.close()</script>")
response.end
end if
end if
%>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%
set rs=server.createobject("adodb.recordset")
sql="select * from personplan where uid='"&session("uid")&"' and id="&CLng(request("id"))
rs.open sql,conn,1,1
if rs.eof then
response.redirect "error.htm"
response.end
end if
%>
<form action="" method="POST" name="form" >
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="35">
<tr>
<td background="images/outplan4.gif" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
<tbody>
<tr>
<td width="30" align="right"><img src="images/outplan7.gif" width="22" height="35"></td>
<td width="70" align="center"> <a href="#" class="wlink" onClick="return checksaveplan()">保
存</a></td>
<td width="10"><img src="images/outplanline.gif" width="16" height="35"></td>
<td width="22"><img src="images/outplan6.gif" width="22" height="35"></td>
<td width="70" align="center"> <a href="#" class="wlink" onClick="return checkdelplan()">删
除</a></td>
<td width="3"><img src="images/outplanline.gif" width="16" height="35"></td>
<td width="22"><img src="images/outplan5.gif" width="22" height="35"></td>
<td width="70" align="center"> <a href="#" onClick="window.close()" class="wlink">关
闭</a></td>
<td width="6"><img src="images/outplanline.gif" width="16" height="35"></td>
<td class="wnolink"> </td>
</tr>
</tbody>
</table>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="40">
<tbody>
<tr>
<td width="210" background="images/outplan1.gif" class="outtitle"> 个人安排</td>
<td width="91"><img src="images/outplan2.gif" width="91" height="40"></td>
<td background="images/outplan3.gif" valign="top" width="45"> </td>
<td width="2"><img src="images/outplan8.gif" width="2" height="40"></td>
<td background="images/outplan9.gif" width="75" align="center" valign="middle">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
<tbody>
<tr height="6">
<td align="center" height="6"></td>
</tr>
<tr>
<td align="center" class="whitetd">详细内容</td>
</tr>
</tbody>
</table>
</td>
<td width="2"><img src="images/outplan8.gif" width="2" height="40"></td>
<td background="images/outplan3.gif" valign="top"> </td>
</tr>
</tbody>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" height="123">
<tr>
<td height="33" valign="top">
<div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="30"> </td>
<td>
<table width="100%" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" align="center">
<tr>
<td width="100" height="40" align="left"> 内 容： </td>
<td height="40">
<input title="点击输入安排内容" type="text" name="content" maxlength="40" value="<%=rs("content")%>" size="70" class="noinput">
</td>
</tr>
<tr>
<td width="100" height="40" align="left"> 安排时间：</td>
<td height="40">
<select name="hourtext" size="1" >
<option value="<%=left(rs("plantime"),2)%>" selected><%=left(rs("plantime"),2)%></option>
<%for i=6 to 18%>
<option value="<%if len(i)=1 then Response.Write 0&i else Response.Write i%>" >
<%if len(i)=1 then Response.Write 0&i else Response.Write i%>
</option>
<%next%>
</select>
点
<select name="minutetext" size="1" >
<option value="<%=right(rs("plantime"),2)%>" selected><%=right(rs("plantime"),2)%></option>
<%for i=0 to 11%>
<option value="<%if len(i*5)=1 then Response.Write 0&i*5 else Response.Write i*5%>">
<%if len(i*5)=1 then Response.Write 0&i*5 else Response.Write i*5%>
</option>
<%next%>
</select>
分</td>
</tr>
<tr>
<td width="100" height="40" align="left"> 提醒时间：</td>
<td height="40">
<select name="remindhour" size="1">
<option value="<%=left(rs("remindtime"),2)%>" selected><%=left(rs("remindtime"),2)%></option>
<%for i=6 to 18%>
<option value="<%if len(i)=1 then Response.Write 0&i else Response.Write i%>" >
<%if len(i)=1 then Response.Write 0&i else Response.Write i%>
</option>
<%next%>
</select>
点
<select name="remindminute" size="1" >
<option value="<%=right(rs("remindtime"),2)%>" selected><%=right(rs("remindtime"),2)%></option>
<%for i=0 to 11%>
<option value="<%if len(i*5)=1 then Response.Write 0&i*5 else Response.Write i*5%>" >
<%if len(i*5)=1 then Response.Write 0&i*5 else Response.Write i*5%>
</option>
<%next%>
</select>
分</td>
</tr>
<tr>
<td width="100" height="40" align="left"> 安排日期：</td>
<td height="40">
<input title="点击选择安排日期" readonly type="text" name="dodate" onClick="setday(dodate,document.all.dodate)" style="cursor:hand" value="<%=rs("plandate")%>" size="25" class="noinput" maxlength="25">
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="85%" border="0" cellspacing="0" cellpadding="0">
<tr height="1">
<td bgcolor="0066CC" height="1"></td>
</tr height="1">
<tr>
<td bgcolor="ffffff" height="1"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr height="20">
<td ></td>
<td></td>
</tr>
<tr>
<td width="30"> </td>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100" align="left">备 注:</td>
<td>
<textarea name="bz" rows="5" cols="60" class="body1"><%=rs("bz")%></textarea>
</td>
</tr>
</table>
</td>
</tr>
</table>
<input type="hidden" name="choose">
<input type="hidden" name="id" value="<%=CLng(request("id"))%>">
</div>
</td>
</tr>
</table>
</form>
<script language=javascript src="calendar.js">
</script>
<!--#include file="close.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -