📄 project_edit8.asp
字号:
<!--#include file="../Include/TimeOut.asp"-->
<!--#include file="../Include/online.asp"-->
<%
'判断是否填封面页或修改页
if session("ProjectCode")="" and session("ProjectName")="" then
Response.Redirect ("Project_edit1.asp?projectinfo=请先注册封面信息!")
else
ProjectCode=session("ProjectCode")
ProjectName=session("ProjectName")
end if
%>
<!--#include file="../Include/AdoConn.asp"-->
<%
ZhuG=""
ZhuGYJ=""
KjjChuS=""
KjjChuSYJ=""
Expert=""
ExpertYJ=""
KJJZhongH=""
KJJZhongHYJ=""
KjjJuZ=""
KjjJuZYJ=""
ProjectJD=""
back=""
%>
<%
'修改
if not session("ProjectCode")="" then
set rst=server.createobject("ADODB.recordset")'修改项目基本表，管理部门意见
Strsql="select 主管部门推荐结果,主管部门推荐意见,初审结果,初审意见,论证结果,论证意见,联审结果,联审意见,审议结果,审议意见,项目进度,退回标志 from xt_VD_ProjectBasic where 项目编码='"&session("ProjectCode")&"'"
rst.open Strsql,strconn
if not rst.EOF then
ZhuG=rst("主管部门推荐结果")
ZhuGYJ=rst("主管部门推荐意见")
KjjChuS=rst("初审结果")
KjjChuSYJ=rst("初审意见")
Expert=rst("论证结果")
ExpertYJ=rst("论证意见")
KJJZhongH=rst("联审结果")
KJJZhongHYJ=rst("联审意见")
KjjJuZ=rst("审议结果")
KjjJuZYJ=rst("审议意见")
ProjectJD=rst("项目进度")
back=rst("退回标志")
end if
end if
%>
<html>
<head>
<title>项目申报书_项目情况</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="/CssLib/CssLink.css">
<style>
td{font-size:9pt}
.button
{
BACKGROUND-COLOR: #e6f4ff;
BORDER-BOTTOM: #0099ff 1px solid;
BORDER-LEFT: #0099ff 1px solid;
BORDER-RIGHT: #0099ff 1px solid;
BORDER-TOP: #0099ff 1px solid;
COLOR: #336699;
HEIGHT: 18px;
TEXT-ALIGN: center
}
A:link
{
COLOR: #000000;
FONT-FAMILY: 宋体;
FONT-SIZE: 9pt
}
A:visited
{
COLOR: #000000;
FONT-FAMILY: 宋体;
FONT-SIZE: 9pt
}
A:active
{
COLOR: #000000;
FONT-FAMILY: 宋体;
FONT-SIZE: 9pt
}
A:hover
{
COLOR: blue;
FONT-FAMILY: 宋体;
FONT-SIZE: 9pt
}
</style>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="window.top.ProjectMax()">
<table width="720" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="4" height="1" bgcolor="#ffcc00"></td>
</tr>
<tr>
<td colspan="4" height="20" bgcolor="#FF9900"> 项目编码[<font color="#FFFF00"><%=session("ProjectCode")%></font>] 项目名称[<font color="#FFFF00"><%=session("ProjectName")%></font>] <font color="#FFFF00"><%=request.querystring("ProjectInfo")%></font></td>
</tr>
<tr>
<td width="520" height="400" valign="top">
<table border="0" cellspacing="0" cellpadding="0" align="center" width="382">
<tr>
<td height="20">
<div align="center"><img src="../public/images/shenbaoshu.gif" width="300" height="40"><img src="../public/images/lastpost.gif" width="11" height="11">
<font color="#0066CC"> 8.项目意见 </font></div>
</td>
</tr>
</table>
<table width="520" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td colspan="3" bgcolor="#FFFFFF" height="20">
<div align="left"></div>
</td>
<td height="20" width="9" bgcolor="#FFFFFF"> </td>
</tr>
<tr>
<td height="25" colspan="4"><font color="#0066CC"><b>八、管理部门意见</b></font></td>
</tr>
<form name="form1" method="post" action="Project_regist8.asp">
<tr>
<td height="20" width="11" bgcolor="#EAEAEA"> </td>
<td height="20" width="168" bgcolor="#EAEAEA">主管部门推荐结果：<br>
</td>
<td height="20" width="332" bgcolor="#EAEAEA">
<input type="radio" name="ZhuG" value="重点推荐" <%if ZhuG="重点推荐" then response.write "checked" end if%><%if ZhuG="" then response.write "checked" end if%>>
重点推荐
<input type="radio" name="ZhuG" value="同意推荐" <%if ZhuG="同意推荐" then response.write "checked" end if%>>
同意推荐
<input type="radio" name="ZhuG" value="不同意推荐"<%if ZhuG="不同意推荐" then response.write "checked" end if%>>
不同意推荐 </td>
<td height="20" width="9" bgcolor="#EAEAEA"> </td>
</tr>
<tr>
<td height="20" width="11"> </td>
<td height="20" width="168">主管部门推荐意见：</td>
<td height="20" width="332"> </td>
<td height="20" width="9"> </td>
</tr>
<tr>
<td height="80" colspan="3" bgcolor="white" align="center">
<textarea name="ZhuGYJ" rows="4" cols="65"><%=ZhuGYJ%></textarea>
</td>
<td height="30" width="9" bgcolor="white"> </td>
</tr>
<tr>
<td height="20" width="11" bgcolor="#EAEAEA"> </td>
<td height="20" width="168" bgcolor="#EAEAEA">市科技局分管处室初审结果：<br>
</td>
<td height="20" width="332" bgcolor="#EAEAEA">
<input type="radio" name="KjjChuS" value="初审优秀重点推荐" <%if KjjChuS="初审优秀重点推荐" then response.write "checked" end if%><%if KjjChuS="" then response.write "checked" end if%>>
初审优秀重点推荐
<input type="radio" name="KjjChuS" value="初审合格" <%if KjjChuS="初审合格" then response.write "checked" end if%>>
初审合格
<input type="radio" name="KjjChuS" value="初审不合格" <%if KjjChuS="初审不合格" then response.write "checked" end if%>>
初审不合格 </td>
<td height="20" width="9" bgcolor="#EAEAEA"> </td>
</tr>
<tr>
<td height="20" width="11"> </td>
<td height="20" width="168">市科技局分管处室初审意见：</td>
<td height="20" width="332"> </td>
<td height="20" width="9"> </td>
</tr>
<tr>
<td height="80" colspan="3" bgcolor="white" align="center">
<textarea name="KjjChuSYJ" rows="4" cols="65"><%=KjjChuSYJ%></textarea>
</td>
<td height="30" width="9" bgcolor="white"> </td>
</tr>
<tr>
<td height="20" width="11" bgcolor="#EAEAEA"> </td>
<td height="20" width="168" bgcolor="#EAEAEA">专家论证结果：<br>
</td>
<td height="20" width="332" bgcolor="#EAEAEA">
<input type="radio" name="Expert" value="推荐" <%if Expert="推荐" then response.write "checked" end if%><%if Expert="" then response.write "checked" end if%>>
推荐
<input type="radio" name="Expert" value="可选" <%if Expert="可选" then response.write "checked" end if%>>
可选
<input type="radio" name="Expert" value="落选" <%if Expert="落选" then response.write "checked" end if%>>
落选</td>
<td height="20" width="9" bgcolor="#EAEAEA"> </td>
</tr>
<tr>
<td height="20" width="11"> </td>
<td height="20" width="168">专家论证意见：</td>
<td height="20" width="332"> </td>
<td height="20" width="9"> </td>
</tr>
<tr>
<td height="80" colspan="3" bgcolor="white" align="center">
<textarea name="ExpertYJ" rows="4" cols="65"><%=ExpertYJ%></textarea>
</td>
<td height="30" width="9" bgcolor="white"> </td>
</tr>
<tr>
<td height="20" width="11" bgcolor="#EAEAEA"> </td>
<td height="20" width="168" bgcolor="#EAEAEA">市科技局综合计划处室与<br>
分管理室联审结果：<br>
</td>
<td height="20" width="332" bgcolor="#EAEAEA">
<input type="radio" name="KjjZhongH" value="联审优秀" <%if KjjZhongH="联审优秀" then response.write "checked" end if%><%if KjjZhongH="" then response.write "checked" end if%>>
联审优秀
<input type="radio" name="KjjZhongH" value="联审合格" <%if KjjZhongH="联审合格" then response.write "checked" end if%>>
联审合格
<input type="radio" name="KjjZhongH" value="联审不合格"<%if KjjZhongH="联审不合格" then response.write "checked" end if%>>
联审不合格</td>
<td height="20" width="9" bgcolor="#EAEAEA"> </td>
</tr>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -