📄 addsoft.asp
字号:
<!--#include file="data.asp"-->
<html><head><title>新建项目</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="oa.css" rel=stylesheet>
</head>
<BODY>
<Script Language="javaScript">
function validate()
{
if (document.myform.softname.value=="")
{
alert("项目名称不能为空");
document.myform.softname.focus();
return false ;
}
if (document.myform.content.value=="")
{
alert("内容说明不能为空");
document.myform.content.focus();
return false ;
}
if (document.myform.size.value=="")
{
alert("责任人不能为空");
document.myform.size.focus();
return false ;
}
if (document.myform.url.value=="")
{
alert("文件连接不能为空");
document.myform.url.focus();
return false ;
}
}
</Script>
<%
Set myrs= Server.CreateObject("ADODB.Recordset")
strSql="select * from user"
myrs.open strSql,Conn,1,1
%>
<form method="POST" action="addsoft_save.asp" name=myform onSubmit='return validate()'>
<div align="center">
<TABLE border=1 bordercolorlight='000000' bordercolordark=#ffffff cellspacing=0 cellpadding=0 align=center>
<TR>
<TD height=20 width=60> 项目名称</TD>
<TD height=20>
<INPUT name="softname"
size=20 class="txt">
</TD>
</TR> <tr> <td bgcolor="#EFEFEF"> 截止时间</td><td bgcolor="#FFFFFF">
<select name="year2"> <%for i=year(now()) to year(now())+4%> <option value="<%=i%>"><%=i%></option>
<%next%> </select> 年 <select name="month2"> <%for i=1 to 12
j="0"&i
%> <option value="<%=right(j,2)%>" <%if i=month(now()) then response.write" selected"%>><%=right(j,2)%></option>
<%next%> </select> 月 <select name="day2"> <%for i=1 to 31
j="0"&i
%> <option value="<%=right(j,2)%>" <%if i=day(now()) then response.write" selected"%>><%=right(j,2)%></option>
<%next%> </select> 日
无终止<INPUT TYPE="radio" NAME="zz" value="true">
</td></tr>
<tr><TD height=20 width=60> 固定提醒</TD><TD height=20> 是<INPUT TYPE="radio" NAME="tx" value="true"> 否<INPUT TYPE="radio" name="tx" value="0" >
<select name="tixi">
<option value="1" selected>每天一次</option>
<option value="30">每月一次</option>
<option value="365">每年一次</option>
</select> </TD>
</tr>
<tr> <TD height=20 width=60> 自定提醒</TD>
<TD height=20> 是<INPUT TYPE="radio" NAME="txz" value="true"> 否<INPUT TYPE="radio" name="txz" value="0" >
<INPUT name="tixiz"
size=5 class="txt">天
</TD>
</tr>
<tr> <td bgcolor="#EFEFEF"> 到时提醒</td><td bgcolor="#FFFFFF"> 是<INPUT TYPE="radio" NAME="txs" value="true"> 否<INPUT TYPE="radio" name="txs" value="0" >
<select name="year3"> <%for i=year(now()) to year(now())+4%> <option value="<%=i%>"><%=i%></option>
<%next%> </select> 年 <select name="month3"> <%for i=1 to 12
j="0"&i
%> <option value="<%=right(j,2)%>" <%if i=month(now()) then response.write" selected"%>><%=right(j,2)%></option>
<%next%> </select> 月 <select name="day3"> <%for i=1 to 31
j="0"&i
%> <option value="<%=right(j,2)%>" <%if i=day(now()) then response.write" selected"%>><%=right(j,2)%></option>
<%next%> </select> 日
</td></tr>
<TD height=10 width=80> 负责人员</TD>
<TD height=10>
<select NAME="size" multiple>
<%if myrs.eof and myrs.bof then
response.write "<font color='red'>还没有任何内容</font>"
else
do while not (myrs.eof or myrs.bof)
if myrs("name")=rs("part") then
sel="selected"
else
sel=""
end if
%>
<option value="<%=myrs("name")%>" <%=sel%>><%=myrs("name")%></option>
<%myrs.movenext
loop
end if%>
</select>
</TD>
</TR>
<TR>
<TD height=20 width=60>
<div align="center">内 容<BR><BR>说 明</div>
</TD>
<TD height=20>
<TEXTAREA cols=41 name="content" rows=6 class="txt" style="overflow:auto"></TEXTAREA>
</TD>
</TR>
<TR>
<TD height=20 width=60>
<div align="center">是否重要</div>
</TD>
<TD height=20> 是<INPUT TYPE="radio" NAME="best" value="true"> 否<INPUT TYPE="radio" name="best" value="0" checked>
</TD>
</TR>
<TR>
<TD height=20 width=60>
<div align="center">是否独享</div>
</TD>
<TD height=20> 是<INPUT TYPE="radio" NAME="dx" value="0"> 否<INPUT TYPE="radio" name="dx" value="true" checked>
</TD>
</TR>
<tr>
<TD height=20 width=60> 提交表单</TD>
<td height="16"><input type="submit" value=" 提 交 " class="txt"> <INPUT TYPE="reset" value=" 重 置 " class="txt"></td>
</tr></table>
</div></form></body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -