⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 project_edit3.asp

📁 ASP程序实现的科技期刊系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
              获得专利数量</td>
            <td height="30" width="8" bgcolor="#EAEAEA">&nbsp;</td>
            <td height="30" width="152" bgcolor="#EAEAEA"> 
              <input type="text" name="ZhuanLi" size="10" maxlength="10" value="<%=ZhuanLi%>" onblur="return isnumeric(ZhuanLi) ">
            </td>
            <td height="30" width="97" bgcolor="#EAEAEA">其中发明专利数量</td>
            <td height="30" width="10" bgcolor="#EAEAEA">&nbsp;</td>
            <td height="30" width="129" bgcolor="#EAEAEA"> 
              <input type="text" name="FaMingZL" size="10" maxlength="10" value="<%=FaMingZL%>" onblur="return isnumeric(FaMingZL) ">
            </td>
            <td height="30" width="17" bgcolor="#EAEAEA">&nbsp;</td>
          </tr>
          <tr> 
            <td height="25" width="8" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="30" width="88" bgcolor="#FFFFFF"> 
              <p>技术来源1</p>
            </td>
            <td height="30" width="8" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="30" colspan="4" bgcolor="#FFFFFF"> 
              <input type="checkbox" name="LaiYuan1" value="自有技术" <%if instr(LaiYuan1,"自有技术")<>0 then response.write "checked" end if%>>
              自有技术
              <input type="checkbox" name="LaiYuan1" value="产学研合作开发技术" <%if instr(LaiYuan1,"产学研合作开发技术")<>0 then response.write "checked" end if%>>
              产学研合作开发技术 
              <input type="checkbox" name="LaiYuan1" value="国内其他单位技术" <%if instr(LaiYuan1,"国内其他单位技术")<>0 then response.write "checked" end if%>>
              国内其他单位技术<br>
              <input type="checkbox" name="LaiYuan1" value="引进技术本单位消化创新" <%if instr(LaiYuan1,"引进技术本单位消化创新")<>0 then response.write "checked" end if%>>
              引进技术本单位消化创新 
              <input type="checkbox" name="LaiYuan1" value="国外技术" <%if instr(LaiYuan1,"国外技术")<>0 then response.write "checked" end if%>>
              国外技术<br>
            </td>
            <td height="30" width="17" bgcolor="#FFFFFF">&nbsp;</td>
          </tr>
          <tr> 
            <td height="25" width="8" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="30" width="88" bgcolor="#EAEAEA">技术来源2</td>
            <td height="30" width="8" bgcolor="#EAEAEA">&nbsp;</td>
            <td height="30" colspan="4" bgcolor="#EAEAEA"> 
              <input type="checkbox" name="LaiYuan2" value="国家攻关计划" <%if instr(LaiYuan2,"国家攻关计划")<>0 then response.write "checked" end if%>>
              国家攻关计划 
              <input type="checkbox" name="LaiYuan2" value="国家863计划" <%if instr(LaiYuan2,"国家863计划")<>0 then response.write "checked" end if%>>
              国家863计划 
              <input type="checkbox" name="LaiYuan2" value="国家自然科学基金计划" <%if instr(LaiYuan2,"国家自然科学基金计划")<>0 then response.write "checked" end if%>>
              国家自然科学基金计划 <br>
              <input type="checkbox" name="LaiYuan2" value="其他国家级科技计划" <%if instr(LaiYuan2,"其他国家级科技计划")<>0 then response.write "checked" end if%>>
              其他国家级科技计划 
              <input type="checkbox" name="LaiYuan2" value="省级科技计划" <%if instr(LaiYuan2,"省级科技计划")<>0 then response.write "checked" end if%>>
              省级科技计划 
              <input type="checkbox" name="LaiYuan2" value="市级科技计划" <%if instr(LaiYuan2,"市级科技计划")<>0 then response.write "checked" end if%>>
              市级科技计划<br>
              <input type="checkbox" name="LaiYuan2" value="其他" <%if instr(LaiYuan2,"其他")<>0 then response.write "checked" end if%>>
              其他 </td>
            <td height="30" width="17" bgcolor="#EAEAEA">&nbsp;</td>
          </tr>
          <tr> 
            <td height="20" colspan="8" bgcolor="#FFFFFF">&nbsp;</td>
          </tr>
          <tr> 
            <td height="20" colspan="8" bgcolor="#FFFFFF"> 
              <div align="center"> 
                <%if session("view")<>"view" then
					  response.write session("view")
					  %>
                <input class="button" type="submit" name="Submit" value="提交" onClick="return checkfun()">
                <input class="button" type="reset" name="Submit2" value="重填">
                <%end if%>
                <input class="button" type="button" name="Submit3" value="打印" onClick="window.open('../project/print_word_3.asp')">
              </div>
            </td>
          </tr>
          <tr> 
            <td height="20" width="8" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="20" width="88" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="20" width="8" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="20" width="152" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="20" width="97" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="20" width="10" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="20" width="129" bgcolor="#FFFFFF">&nbsp;</td>
            <td height="20" width="17" bgcolor="#FFFFFF">&nbsp;</td>
          </tr>
        </form>
      </table>
    </td>
    <td width="3" height="228" bgcolor="#FF9900"></td>
    <td width="200" valign="top" height="228" align="center"> 
      <table width="100%" border="0" cellspacing="1" cellpadding="0" bgcolor="#FF9900">
        <tr bgcolor="#FFFFFF"> 
          <td colspan="3" align="center" height="20"><font color="#FFFF00"><a href="../Project/Project_Query.asp?query=query"><img src="../public/images/query.gif" width="24" height="18" border="0"><span class="blank">查询我的项目</span></a></font> <a href="PrintAll.asp" target="_blank"><img src="../public/images/print.gif" width="17" height="19" border="0"><span class="blank">全文打印</span></a></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="21" align="center" height="20">No</td>
          <td width="136" height="20"> 
            <div align="center">目 录</div>
          </td>
          <td width="34" align="center" height="20"> 打印</td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="21" align="center" height="20">1</td>
          <td width="136" height="20"><a href="Project_edit1.asp" class="blank">封面</a></td>
          <td width="34" align="center" height="20"> <a href="print_word_1.asp" target="_blank"><img src="../public/images/print.gif" width="17" height="19" border="0"></a></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="21" align="center" height="20">2</td>
          <td width="136" height="20" class="blank"><a href="Project_edit2.asp" class="blank">单位情况</a></td>
          <td width="34" align="center" height="20"> <a href="print_word_2.asp" target="_blank"><img src="../public/images/print.gif" width="17" height="19" border="0"></a></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="21" align="center" height="20">3</td>
          <td width="136" height="20"><a href="Project_edit3.asp" class="blank">项目情况</a></td>
          <td width="34" align="center" height="20"> <a href="print_word_3.asp" target="_blank"><img src="../public/images/print.gif" width="17" height="19" border="0"></a></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="21" align="center" height="20">4</td>
          <td width="136" height="20"><a href="Project_edit4.asp" class="blank">人员情况</a></td>
          <td width="34" align="center" height="20"> <a href="print_word_4.asp" target="_blank"><img src="../public/images/print.gif" width="17" height="19" border="0"></a></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="21" align="center" height="20">5</td>
          <td width="136" height="20"><a href="Project_edit5.asp" class="blank">经费情况</a></td>
          <td width="34" align="center" height="20"> <a href="print_word_5.asp" target="_blank"><img src="../public/images/print.gif" width="17" height="19" border="0"></a></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="21" height="20" align="center">6</td>
          <td width="136" height="20" bgcolor="#FFFFFF"><a href="Project_edit6.asp" class="blank">附件</a></td>
          <td width="34" align="center" height="20"> <a href="print_word_6.asp" target="_blank"><img src="../public/images/print.gif" width="17" height="19" border="0"></a></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td width="21" align="center" height="20">7</td>
          <td width="136" height="20"> 
            <%if session("ProjectType")="43" or session("ProjectType")="44" then %>
            <a href="Project_edit7_4_1.asp" class="blank"> 
            <%end if%>
            <%if session("ProjectType")="46" or session("ProjectType")="47" then %>
            </a><a href="Project_edit7_4_2.asp" class="blank"> 
            <%end if%>
            <%if session("ProjectType")="41" or session("ProjectType")="45" then %>
            </a><a href="Project_edit7_4_3.asp" class="blank"> 
            <%end if%>
            <%if session("ProjectType")="42" then %>
            </a><a href="Project_edit7_4_4.asp" class="blank"> 
            <%end if%>
            <%if left(session("ProjectType"),1)="3" then %>
            </a><a href="Project_edit7_3.asp" class="blank"> 
            <%end if%>
            补充材料</a></td>
          <td width="34" align="center" height="20"> 
            <%if session("ProjectType")="43" or session("ProjectType")="44" then %>
            <a href="Print_word_7_4_1.asp" target="_blank"> <img src="../public/images/print.gif" width="17" height="19" border="0"></a> 
            <%end if%>
            <%if session("ProjectType")="46" or session("ProjectType")="47" then %>
            <a href="Print_word_7_4_2.asp" target="_blank"> <img src="../public/images/print.gif" width="17" height="19" border="0"></a> 
            <%end if%>
            <%if session("ProjectType")="41" or session("ProjectType")="45" then %>
            <a href="Print_word_7_4_3.asp" target="_blank"> <img src="../public/images/print.gif" width="17" height="19" border="0"></a> 
            <%end if%>
            <%if session("ProjectType")="42" then %>
            <a href="Print_word_7_4_4.asp" target="_blank"> <img src="../public/images/print.gif" width="17" height="19" border="0"></a> 
            <%end if%>
            <%if left(session("ProjectType"),1)="3" then %>
            <a href="Print_word_7_3.asp" target="_blank"> <img src="../public/images/print.gif" width="17" height="19" border="0"></a> 
            <%end if%>
          </td>
        </tr>
        <form name="form2" method="post" action="myfileUp.asp" enctype="multipart/form-data">
          <tr bgcolor="#FFFFFF"> 
            <td rowspan="2" align="center" height="41">8</td>
            <td width="136" height="20" >可行性报告</td>
            <td width="34" align="center" height="20"> 
              <%
							set fileobj=Server.CreateObject ("scripting.filesystemobject")
								txtFileName=session("Projectcode") & ".doc"
								filepath=server.mappath("\project\doc") & "\" & txtFileName
								if fileobj.FileExists (filepath) then 
								Response.Write "<a href=..\project\doc\" + txtFileName+" class=blank target='_blank'><img src='../public/images/print.gif' width='17' height='19' border='0'></a>"
								set fileobj=nothing
							end if%>
            </td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td width="136" height="20" > 
              <table style=font-size:9pt; width="100%" border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td colspan="2" height="30"> 
                    <div align="center"> 
                      <input  style="width:120px;height:18px;" type="file" name="file" size="13" class="button">
                      <input type="hidden" name="CopyrightInfo" value="http://www.chinaasp.com">
                    </div>
                  </td>
                </tr>
                <%if not request.querystring("fileInfo")="" then %>
                <tr> 
                  <td colspan="2" height="30">&nbsp;<%=request.querystring("fileinfo")%></td>
                </tr>
                <%end if%>
              </table>
            </td>
            <td width="34" align="center" height="20"> 
              <input type="submit" name="Submit4" value="提交" class="button" onClick="return checkfun1()">
            </td>
          </tr>
        </form>
        <tr bgcolor="#FFFFFF"> 
          <td width="21" align="center" height="20">9</td>
          <td width="136" height="20" ><a href="Project_edit8.asp" class="blank">推荐及审批意见</a></td>
          <td width="34" align="center" height="20"> <a href="print_word_8.asp" target="_blank"><img src="../public/images/print.gif" width="17" height="19" border="0"></a></td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td align="center" height="20"> 
            <%if ProjectJD="申报" then%>
            <p><a href="UpdateToTJ.asp?code=<%=session("ProjectCode")%>"><font color="#CC0000">☆☆ 
              申请推荐 ☆☆</font></a></p>
            <%end if%>
            <%if back="10" then'项目退回%>
            <p><a href="UpdateToTJ.asp?code=<%=session("ProjectCode")%>&again=again"><font color="#CC0000">☆☆ 
              重新申报 ☆☆</font></a></p>
            <%end if%>
          </td>
        </tr>
      </table>
      <a href="#" onClick="window.top.switchSysBar()" class="blank">返回</a> </td>
    <td width="3" valign="top" height="228" bgcolor="#FF9900"></td>
  </tr>
</table>
<p>&nbsp;</p>
<p>&nbsp;</p>
</body>
</html>
<script language="vbscript">
function checkfun()   '校验字数是否大于200字
		checkfun=true
		if len(form1.NeiRong.value)>200 then 
			checkfun=false
			window.alert "项目主要内容多于200字,请重新输入!"
			exit function
		end if
		if len(form1.ChengGuo.value)>200 then 
			checkfun=false
			window.alert "项目预期成果多于200字,请重新输入!"
			exit function
		end if
		if len(form1.JinDu.value)>200 then 
			checkfun=false
			window.alert "项目时间进度安排多于200字,请重新输入!"
			exit function
		end if
end function
function checkfun1()   '校验上传路径
		checkfun1=true
		if form2.file.value ="" then 
			checkfun1=false
			window.alert "请选择您的报告路径,请重新输入!"
			exit function
		end if
end function
</script>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -