📄 projectxq_edit.asp
字号:
<%modulecode="1001"%>
<!--#include file="../Include/ModuleUserCheck.asp"-->
<!--#include file="../Include/online.asp"-->
<%
'无变量传来时先赋初值，即添加状态
projectname=""
danweiname=""
zhudaochanye=""
guanlichushi=""
rolePath=""
edit=""
'取得传来变量
strsqlzh=Request.QueryString("strsql")
projectname=Request.Querystring("projectname")
danweiname=Request.Querystring("danweiname")
zhudaochanye=Request.Querystring("zhudaochanye")
guanlichushi=Request.Querystring("guanlichushi")
rolePath=Request.Querystring("path")
page=Cstr(Request.Querystring("page"))
edit=Request.Querystring("edit")
if not projectname="" then
set rst=server.createobject("ADODB.recordset")
Strsql="select * from diaoca where 项目名称='"&projectname&"'"
rst.open Strsql,strconn
danweiname=rst("单位名称")
zhudaochanye=rst("主导产业")
guanlichushi=rst("管理处室")
end if
%>
<html>
<head>
<title>需求设置</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../CssLib/Cssbutton.css">
</head>
<body text="#000000" bgcolor="#ffffff">
<font color="#00CCFF" size="1">★<img src="../System/images/edit_title_rolecode.gif" width="200" height="27">★★★★<font color="#00CCFF" size="1">★★★★★</font><font color="#00CCFF" size="1">★★★★★</font><font color="#00CCFF" size="1">★★★★★</font>★★</font><br>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="21" height="20"><img src="../public/images/edit_bg_zs.gif" width="21" height="20"></td>
<td background="../public/images/bg_left.gif" bgcolor="#0099FF" colspan="3">
<div align="center"></div>
</td>
<td colspan="2"><img src="../public/images/edit_bg_ys.gif" width="21" height="20"></td>
</tr>
<tr>
<td valign="top" rowspan="2" background="../public/images/bg_left.gif"> </td>
<td width="80" height="13"></td>
<td width="576"></td>
<td width="59"></td>
<td width="22" rowspan="2" valign="top" bgcolor="#FFFFFF" background="../public/images/bg_left.gif"> </td>
<td width="3"></td>
</tr>
<tr>
<td height="516"></td>
<td valign="top" bgcolor="#FFFFFF">
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="20" width="1" bgcolor="#FFFFFF"> </td>
<td width="81" bgcolor="#FFFFFF"> </td>
<td width="388" bgcolor="#FFFFFF"> </td>
<td valign="top" width="93" bgcolor="#FFFFFF"> </td>
<td width="2"></td>
</tr>
<form name="conlist" method="post" action="projectXQ_regist.asp?strsql=<%=server.URLEncode(strsqlzh)%>&edit=<%=request.querystring("edit")%>&page=<%=Cstr(request.querystring("page"))%>" onSubmit="return checkfun()">
<tr>
<td valign="top" bgcolor="#EAEAEA" rowspan="2"> </td>
<td height="25" valign="middle" bgcolor="#EAEAEA">
<div align="left"> 项目名称</div>
</td>
<td valign="middle" bgcolor="#EAEAEA">
<% if not edit="" then
response.write projectname '修改状态
Response.Write "<input type='hidden' name='projectname' value='"&projectname&"'>"
else %>
<input type="text" name="projectname" maxlength=10>
<%
end if
%>
<font color="#ff0000">** </font> （注：**为必填项,下同 ）</td>
<td valign="top" bgcolor="#EAEAEA"> </td>
<td></td>
</tr>
<tr>
<td valign="middle" rowspan="2" bgcolor="white">
<div align="left">单位名称</div>
</td>
<td valign="middle" rowspan="2" bgcolor="#FFFFFF">
<% if not edit="" then
response.write danweiname '修改状态
Response.Write "<input type='hidden' name='danweiname' value='"&danweiname&"'>"
else %>
<input type="text" name="danweiname" maxlength=10>
<%
end if
%>
<font color="#ff0000">** </font> （注：**为必填项,下同。 ）<br>
</td>
<td valign="top" rowspan="2" bgcolor="#FFFFFF"> </td>
<td height="12"></td>
</tr>
<tr>
<td valign="top" rowspan="2" bgcolor="#FFFFFF"> </td>
<td height="13"></td>
</tr>
<tr>
<td valign="middle" rowspan="2" bgcolor="#EAEAEA">
<div align="left">主导产业</div>
</td>
<td valign="middle" rowspan="2" bgcolor="#EAEAEA">
<% if not edit="" then
response.write zhudaochanye '修改状态
Response.Write "<input type='hidden' name='zhudaochanye' value='"&zhudaochanye&"'>"
else %>
<input type="text" name="zhudaochanye" maxlength=10>
<%
end if
%>
<font color="#ff0000">** </font> （注：**为必填项,下同)
</td>
<td valign="top" bgcolor="#EAEAEA" rowspan="2"> </td>
<td height="22"></td>
</tr>
<tr>
<td valign="top" bgcolor="#EAEAEA" rowspan="3"> </td>
<td height="3"></td>
</tr>
<tr>
<td height="25" valign="middle" bgcolor="#FFFFFF"><font color="#000000">管理处室</font></td>
<td valign="middle" bgcolor="#FFFFFF">
<% if not edit="" then
response.write guanlichushi '修改状态
Response.Write "<input type='hidden' name='guanlichushi' value='"&guanlichushi&"'>"
else %>
<input type="text" name="guanlichushi" maxlength=10>
<%
end if
%>
<font color="#ff0000">** </font> （注：**为必填项,下同)
</td>
<td valign="top" bgcolor="#FFFFFF"><font color="#FFFFFF"></font></td>
<td></td>
</tr>
<tr>
<td height="1"></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td rowspan="2" valign="top" bgcolor="#FFFFFF"><font color="#FFFFFF"></font></td>
<td height="25" colspan="3" valign="middle" bgcolor="#EAEAEA">备注1：</td>
<td></td>
</tr>
<tr>
<td valign="top" colspan="3" rowspan="3" bgcolor="#FFFFFF">
<textarea name="beizhua" cols="90" rows="5"></textarea>
</td>
<td height="10"></td>
</tr>
<tr>
<td height="28" valign="top"> </td>
<td></td>
</tr>
<tr>
<td height="59"></td>
<td></td>
</tr>
<tr>
<td height="25"></td>
<td colspan="3" valign="middle" bgcolor="#EAEAEA">备注2：</td>
<td></td>
</tr>
<tr>
<td height="97"></td>
<td colspan="3" valign="top" bgcolor="#FFFFFF">
<textarea name="beizhub" cols="90" rows="5"></textarea>
</td>
<td></td>
</tr>
<tr>
<td height="25"></td>
<td colspan="3" valign="middle" bgcolor="#EAEAEA" align="left">备注3：</td>
<td></td>
</tr>
<tr>
<td height="97"></td>
<td colspan="3" valign="top" bgcolor="#FFFFFF">
<textarea name="beizhuc" cols="90" rows="5"></textarea>
</td>
<td></td>
</tr>
<tr>
<td height="29" colspan="4" valign="top" bgcolor="#EAEAEA">
<div align="center">
<input class="button" type="submit" name="Submit" value="提交">
<input class="button" type="reset" name="Submit2" value="重填">
<input class="button" type="button" name="Submit3" value="返回"onClick="back()">
</div>
</td>
<td></td>
</tr>
</form>
</table>
</td>
<td></td>
<td></td>
</tr>
<tr>
<td height="20" valign="top"><img src="../public/images/edit_bg_zx.gif" width="21" height="20"></td>
<td colspan="3" valign="top" bgcolor="#FFFFFF" background="../public/images/bg_left.gif"> </td>
<td valign="top">
<div align="right"><img src="../public/images/edit_bg_yx.gif" width="21" height="20"></div>
</td>
<td></td>
</tr>
</table>
</body>
</html>
<script language="vbscript">
function checkfun() '校验表单
checkfun=true
if ConList.projectname.value="" then
checkfun=false
window.alert "项目名称不能为空，请重新输入！"
exit function
end if
if ConList.danweiname.value ="" then
checkfun=false
window.alert "单位名称不能为空，请重新输入！"
exit function
end if
if ConList.zhudaochanye.value ="" then
checkfun=false
window.alert "主导产业不能为空，请重新输入！"
exit function
end if
if ConList.guanlichushi.value ="" then
checkfun=false
window.alert "管理处室不能为空，请重新输入！"
exit function
end if
end function
function back()
history.back
end function
</script>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -