📄 edit.asp
字号:
<%@LANGUAGE="VBScript"%>
<%response.expires=0%>
<%Response.Buffer=true%>
<!-- #include file="../conn_lr.asp"-->
<!-- #include file="../css.asp"-->
<%
oabusyname=request.cookies("oabusyname")
oabusyusername=request.cookies("oabusyusername")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
session("id")=request.cookies("oabusyname")
if oabusyusername="" then
response.write("<script language=""javascript"">")
response.write("window.top.location.href='../../default.asp';")
response.write("</script>")
response.end
end if
%>
<html>
<head>
<title>显示信息</title>
<meta http-equiv=Content-Type content="text/html; charset=gb2312">
<!-- #Include File=../main/css.asp -->
<%
'定义变量
dim Number ' 当前操作记录号
dim opFlag ' 操作标志('cmdAddNew'/'cmdEdit'/'cmdSee')
'过滤错误
on error resume next
dim title,image
dim year1,month1,day1,hour1,minute1,year2,month2,day2,hour2,minute2,vtext,i,j
'获取输入参数:记录号和操作标志
Number=request("Number")
if Number="" then Number="0"
Number=Cint(Number)
opFlag=request("opFlag")
'创建记录访问对象
Set rs = Server.CreateObject("ADODB.Recordset")
'初始化参数
if opFlag<>"cmdAddNew" then
'打开记录源,并定位到输入参数决定的记录号
rs.Open Session("SQL"),Session("conn"),1,3
rs.move number
'日期显示变量
temptime = "" & rs("vtime")
year1 = mid(temptime,1,4)
month1 = mid(temptime,6,2)
day1 = mid(temptime,9,2)
hour1 = mid(temptime,12,2)
minute1 = mid(temptime,15,2)
temptime = "" & rs("vremindtime")
year2 = mid(temptime,1,4)
month2 = mid(temptime,6,2)
day2 = mid(temptime,9,2)
hour2 = mid(temptime,12,2)
minute2 = mid(temptime,15,2)
vtext=rs("vtext")
else
'日期显示变量
temptime = now()
year1 = year(temptime)
month1 = right("0" & month(temptime),2)
day1 = right("0" & day(temptime),2)
hour1 = right("0" & hour(temptime),2)
minute1= right("0" & minute(temptime),2)
year2 = year1
month2 = month1
day2 = day1
hour2 = hour1
minute2= minute1
vtext=""
end if
image="../images/cala.gif"
title="日程安排"
%>
<style>
.css0 {<%=Session("vinputtext")%> }
</style>
<script language="JavaScript">
function CountTime()
{ //计算计划起止日期脚本
var t='';
t=t + document.all.submitinput.year1.value +'-';
t=t + document.all.submitinput.month1.value + '-';
t=t + document.all.submitinput.day1.value + ' '
t=t + document.all.submitinput.hour1.value + ':'
t=t + document.all.submitinput.minute1.value
document.all.submitinput.vtime.value=t
t='';
t=t + document.all.submitinput.year2.value +'-';
t=t + document.all.submitinput.month2.value + '-';
t=t + document.all.submitinput.day2.value + ' ' ;
t=t + document.all.submitinput.hour2.value + ':';
t=t + document.all.submitinput.minute2.value
document.all.submitinput.vremindtime.value=t;
}
function oninput()
{
CountTime();
if (document.submitinput.vtitle.value=="")
{
alert("日程标题不能为空!");
document.submitinput.vtitle.focus();
return false;
}
if (document.submitinput.vtext.value=="")
{
alert("日程内容不能为空!");
document.submitinput.vtext.focus();
return false;
}
if (document.submitinput.vtitle.value.length>50)
{
alert("日程标题输入不能超过25字");
document.submitinput.vtitle.focus();
return false;
}
rphtml('vtext','vtitle');
document.all.submitinput.submit();
}
function focusit()
{
document.all.vtitle.focus();
}
</script>
</head>
<body leftmargin="0" topmargin="0" onLoad="focusit()">
<form name="submitinput" action="save.asp?opFlag=<%=opFlag%>&Number=<%=Number%>" method="post" >
<!-- #include file="../inc/title.asp" -->
<input type=hidden name="vplan">
<table border="0" class=vtext cellspacing="1" align="center" width="95%" cellpadding="0" bgcolor="<%=Session("vtablebordercolor")%>" >
<tr bgcolor="<%=Session("vtabletitlebackcolor")%>" align="left">
<td height="30" width="100" align="right"><b>活动时间：</b></td>
<td height="30" bgcolor="<%=Session("vtabletitlebackcolor")%>">
<select name="year1">
<%for i=year(now()) to year(now())+4%>
<option value="<%=i%>" <%if Cstr(i)=year1 then response.write" selected"%>><%=i%></option>
<%next%>
</select>
年
<select name="month1">
<%for i=1 to 12
j=right("0"&i,2)
%>
<option value="<%=j%>" <%if j=month1 then response.write" selected"%>><%=j%></option>
<%next%>
</select>
月
<select name="day1">
<%for i=1 to 31
j=right("0"&i,2)
%>
<option value="<%=j%>" <%if j=day1 then response.write" selected"%>><%=j%></option>
<%next%>
</select>
日
<select name="hour1">
<%for i=0 to 23
j=right("0"&i,2)
%>
<option value="<%=j%>" <%if j=hour1 then response.write" selected"%>><%=j%></option>
<%next%>
</select>
:
<select name="minute1">
<%for i=0 to 59
j=right("0"&i,2)
%>
<option value="<%=j%>" <%if j=minute1 then response.write" selected"%>><%=j%></option>
<%next%>
</select>
<tr align="left" bgcolor="<%=Session("vtabletitlebackcolor")%>">
<td height="30" width="100" align="right"><b>提醒时间：</b></td>
<td height="30">
<select name="year2">
<%for i=year(now()) to year(now())+4%>
<option value="<%=i%>" <%if Cstr(i)=year2 then response.write" selected"%>><%=i%></option>
<%next%>
</select>
年
<select name="month2">
<%for i=1 to 12
j=right("0"&i,2)
%>
<option value="<%=j%>" <%if j=month2 then response.write" selected"%>><%=j%></option>
<%next%>
</select>
月
<select name="day2">
<%for i=1 to 31
j=right("0"&i,2)
%>
<option value="<%=j%>" <%if j=day2 then response.write" selected"%>><%=j%></option>
<%next%>
</select>
日
<select name="hour2">
<%for i=0 to 23
j=right("0"&i,2)
%>
<option value="<%=j%>" <%if j=hour2 then response.write" selected"%>><%=j%></option>
<%next%>
</select>
:
<select name="minute2">
<%for i=0 to 59
j=right("0"&i,2)
%>
<option value="<%=j%>" <%if j=minute2 then response.write" selected"%>><%=j%></option>
<%next%>
</select>
</td>
</tr>
<tr align="left" bgcolor="<%=Session("vtabletitlebackcolor")%>">
<td height="30" width="100" align="right" bgcolor="<%=Session("vtabletitlebackcolor")%>">
<b>日程标题：</b></td>
<td height="30" bgcolor="<%=Session("vcolcolor")%>"><b>
<input type="text" name="vtitle" size="40" class="css0" id="日程标题" style=" width=100%; height:20px;border:none" value="<%=replace(rs("vtitle"),"<br>",chr(13))%>" maxlength="50" onKeyDown=gonext("vtext")>
</b></td>
</tr>
<tr align="left" bgcolor="<%=Session("vcolcolor")%>">
<td align="right" valign="middle" bgcolor="<%=Session("vtabletitlebackcolor")%>"><b>日程内容：</b></td>
<td>
<textarea name="vtext" cols="40" class="css0" id="日程内容" style=" width=100%; height:200px;border:none" rows="1"><%=replace(vtext,"<br>",chr(13))%></textarea>
</td>
</tr>
</table>
<p align=center>
<button class=vinputbutton style="height=24" onClick="javascript:oninput()"><img src="../images/save.gif" align="absmiddle"> 保存</button>
<button class=vinputbutton name="Submit6" style="height=24" onClick=javascript:history.go(-1);><img src="../images/back.gif" align="absmiddle"> 返回</button>
<input type="hidden" name="vtime" size="13" class=css0 value="<%=rs("vtime")%>">
<input type="hidden" name="vremindtime" size="13" class=css0 value="<%=rs("vremindtime")%>">
</p>
</form>
<%
rs.close
set rs=nothing
%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -