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

📄 print_word_8.asp

📁 ASP程序实现的科技期刊系统
💻 ASP
字号:
<!--#include file="../include/AdoConn.asp"-->
<% 
ProjectCode=session("ProjectCode")
'if Projectcode="" then
'	Response.Write "您没有填写项目,无法打印。<br>打印空文档,请到<a href='/DownLoad/DownLoad.htm#4'>下载中心</a>下载申报书。"
'	Response.End 
'end if

'等到文本缓冲完才显示
response.buffer = true
ZhuG=""
ZhuGYJ=""
KjjChuS=""
KjjChuSYJ=""
Expert=""
ExpertYJ=""
KJJZhongH=""
KJJZhongHYJ=""
KjjJuZ=""
KjjJuZYJ=""
%>
<%
'修改
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("审议意见")
	end if
end if
%>
<% 

'告诉浏览器用word来显示文档内容
Response.ContentType = "application/msword" 
'文档设定
response.AddHeader "content-disposition", "inline; filename=Apply8.doc"
%>
<html xmlns:o="urn:schemas-microsoft-com:office:office"
xmlns:w="urn:schemas-microsoft-com:office:word"
xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv=Content-Type content="text/html; charset=GB2312">
<meta name=ProgId content=Word.Document>
<meta name=Generator content="Microsoft Word 9">
<meta name=Originator content="Microsoft Word 9">
<link rel=File-List href="./Print_word_7_4_1.files/filelist.xml">
<title> </title>
<style><!--
@font-face
	{font-family:宋体;
	panose-1:2 1 6 0 3 1 1 1 1 1;
	mso-font-alt:SimSun;
	mso-font-charset:134;
	mso-generic-font-family:auto;
	mso-font-pitch:variable;
	mso-font-signature:3 135135232 16 0 262145 0;}
@font-face
	{font-family:黑体;
	panose-1:2 1 6 0 3 1 1 1 1 1;
	mso-font-alt:SimHei;
	mso-font-charset:134;
	mso-generic-font-family:auto;
	mso-font-pitch:variable;
	mso-font-signature:1 135135232 16 0 262144 0;}
@font-face
	{font-family:"\@宋体";
	panose-1:2 1 6 0 3 1 1 1 1 1;
	mso-font-charset:134;
	mso-generic-font-family:auto;
	mso-font-pitch:variable;
	mso-font-signature:3 135135232 16 0 262145 0;}
@font-face
	{font-family:"\@黑体";
	panose-1:2 1 6 0 3 1 1 1 1 1;
	mso-font-charset:134;
	mso-generic-font-family:auto;
	mso-font-pitch:variable;
	mso-font-signature:1 135135232 16 0 262144 0;}
p.MsoNormal, li.MsoNormal, div.MsoNormal
	{mso-style-parent:"";
	margin:0cm;
	margin-bottom:.0001pt;
	text-align:justify;
	text-justify:inter-ideograph;
	mso-pagination:none;
	font-size:10.5pt;
	mso-bidi-font-size:12.0pt;
	font-family:"Times New Roman";
	mso-fareast-font-family:宋体;
	mso-font-kerning:1.0pt;}
@page
	{mso-page-border-surround-header:no;
	mso-page-border-surround-footer:no;}
@page Section1
	{size:595.3pt 841.9pt;
	margin:72.0pt 90.0pt 72.0pt 90.0pt;
	mso-header-margin:42.55pt;
	mso-footer-margin:49.6pt;
	mso-paper-source:0;
	layout-grid:15.6pt;}
div.Section1
	{page:Section1;}
-->
</style>
</head>
<body lang=ZH-CN style="TEXT-JUSTIFY-TRIM: punctuation; tab-interval: 21.0pt" bgcolor="#FFFFFF">
<div class=Section1 style="LAYOUT-GRID:  15.6pt none"> 
  <p class=MsoNormal style='margin-top:.5gd;margin-right:0cm;margin-bottom:.5gd;
margin-left:0cm'><span style='font-size:14.0pt;mso-bidi-font-size:12.0pt;
font-family:黑体;mso-ascii-font-family:"Times New Roman"'>八、管理部门意见</span><span
lang=EN-US style='font-size:14.0pt;mso-bidi-font-size:12.0pt;mso-fareast-font-family:
黑体'><o:p></o:p></span></p>
  <table border=1 cellspacing=0 cellpadding=0 width=616 style='width:461.8pt;
 margin-left:5.4pt;border-collapse:collapse;border:none;mso-border-alt:solid windowtext .5pt;
 mso-padding-alt:0cm 5.4pt 0cm 5.4pt'>
    <tr style='height:17.4pt'> 
      <td width=192 valign=top style='width:144.0pt;border:solid windowtext .5pt;
  padding:0cm 5.4pt 0cm 5.4pt;height:17.4pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>主管部门推荐结果:</span></p>
      </td>
      <td width=424 colspan=2 valign=top style='width:317.8pt;border:solid windowtext .5pt;
  border-left:none;mso-border-left-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:17.4pt'> 
        <p class=MsoNormal>&nbsp;<%=ZhuG%></p>
      </td>
    </tr>
    <tr style='height:105.8pt'> 
      <td width=616 colspan=3 valign=top style='width:461.8pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:105.8pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>主管部门推荐意见:</span></p>
        <p class=MsoNormal><span 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">
      <%
      		if not isnull(ZhuGYJ) then
				response.write replace(ZhuGYJ,chr(10),"<br>")
			end if
	 %>
      
      </span></p>
      </td>
    </tr>
    <tr style='height:17.4pt'> 
      <td width=192 valign=top style='width:144.0pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:17.4pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>市科技局分管处室初审结果:</span></p>
      </td>
      <td width=424 colspan=2 valign=top style='width:317.8pt;border-top:none;
  border-left:none;border-bottom:solid windowtext .5pt;border-right:solid windowtext .5pt;
  mso-border-top-alt:solid windowtext .5pt;mso-border-left-alt:solid windowtext .5pt;
  padding:0cm 5.4pt 0cm 5.4pt;height:17.4pt'> 
        <p class=MsoNormal><%=KjjChuS%></p>
      </td>
    </tr>
    <tr style='height:105.85pt'> 
      <td width=616 colspan=3 valign=top style='width:461.8pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:105.85pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>市科技局分管处室初审意见:</span></p>
        <p class=MsoNormal><span 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">
      <%
      		if not isnull(KjjChuSYJ) then
				response.write replace(KjjChuSYJ,chr(10),"<br>")
			end if
	 %>
</span></p>
      </td>
    </tr>
    <tr style='height:17.4pt'> 
      <td width=192 valign=top style='width:144.0pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:17.4pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>专家论证结果:</span></p>
      </td>
      <td width=424 colspan=2 valign=top style='width:317.8pt;border-top:none;
  border-left:none;border-bottom:solid windowtext .5pt;border-right:solid windowtext .5pt;
  mso-border-top-alt:solid windowtext .5pt;mso-border-left-alt:solid windowtext .5pt;
  padding:0cm 5.4pt 0cm 5.4pt;height:17.4pt'> 
        <p class=MsoNormal><%=Expert%></p>
      </td>
    </tr>
    <tr style='height:98.15pt'> 
      <td width=616 colspan=3 valign=top style='width:461.8pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:98.15pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>专家论证意见:</span></p>
        <p class=MsoNormal><span 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">
      <%
      		if not isnull(ExpertYJ) then
				response.write replace(ExpertYJ,chr(10),"<br>")
			end if
	 %>      
      
      </span></p>
      </td>
    </tr>
    <tr style='height:17.4pt'> 
      <td width=300 colspan=2 valign=top style='width:225.0pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:17.4pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>市科技局综合计划处室与分管处室联审结果:</span></p>
      </td>
      <td width=316 valign=top style='width:236.8pt;border-top:none;border-left:
  none;border-bottom:solid windowtext .5pt;border-right:solid windowtext .5pt;
  mso-border-top-alt:solid windowtext .5pt;mso-border-left-alt:solid windowtext .5pt;
  padding:0cm 5.4pt 0cm 5.4pt;height:17.4pt'> 
        <p class=MsoNormal><%=KjjZhongH%></p>
      </td>
    </tr>
    <tr style='height:106.65pt'> 
      <td width=616 colspan=3 valign=top style='width:461.8pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:106.65pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>市科技局综合计划处室意见:</span></p>
        <p class=MsoNormal><span 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">
      <%
      		if not isnull(KjjZhongHYJ) then
				response.write replace(KjjZhongHYJ,chr(10),"<br>")
			end if
	 %> 
      </td>
    </tr>
    <tr style='height:17.4pt'> 
      <td width=300 colspan=2 valign=top style='width:225.0pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:17.4pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>市科技局局长办公会议审议结果:</span></p>
      </td>
      <td width=316 valign=top style='width:236.8pt;border-top:none;border-left:
  none;border-bottom:solid windowtext .5pt;border-right:solid windowtext .5pt;
  mso-border-top-alt:solid windowtext .5pt;mso-border-left-alt:solid windowtext .5pt;
  padding:0cm 5.4pt 0cm 5.4pt;height:17.4pt'> 
        <p class=MsoNormal><%=KjjJuZ%></p>
      </td>
    </tr>
    <tr style='height:106.05pt'> 
      <td width=616 colspan=3 valign=top style='width:461.8pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:106.05pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>市科技局局长办公会议审议意见:</span></p>
        <p class=MsoNormal><span 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">
      <%
      		if not isnull(KjjJuZYJ) then
				response.write replace(KjjJuZYJ,chr(10),"<br>")
			end if
	 %> 

      </span></p>
      </td>
    </tr>
    <tr height=0> 
      <td width=192 style='border:none'></td>
      <td width=108 style='border:none'></td>
      <td width=316 style='border:none'></td>
    </tr>
  </table>
  <p class=MsoNormal><span lang=EN-US> &nbsp; <o:p></o:p></span></p>
  <p class=MsoNormal> 
    <%

'关闭记录集
rst.close
set rst=nothing
response.flush
response.end
%>
  </p>
  <p class=MsoNormal><span lang=EN-US> &nbsp;<o:p></o:p></span></p>
</div>
</body>
</html>

⌨️ 快捷键说明

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