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

📄 print_word_4.asp

📁 ASP程序实现的科技期刊系统
💻 ASP
📖 第 1 页 / 共 4 页
字号:
<!--#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
Person1=""
Person2=""
Manager=""
name1=""
sex1=""
age1=""
company1=""
ZhiWu1=""
ZhiCheng1=""
XueLi1=""
FenGong1=""
TouRu1=""
dim name(9)
dim sex(9)
dim age(9)
dim company(9)
dim ZhiWu(9)
dim ZhiCheng(9)
dim XueLi(9)
dim FenGong(9)
dim TouRu(9)
for i=0 to 9
name(i)=""
sex(i)=""
age(i)=""
company(i)=""
ZhiWu(i)=""
ZhiCheng(i)=""
XueLi(i)=""
FenGong(i)=""
TouRu(i)=""
next
%>
<%
'修改
if not session("ProjectCode")="" then
set rst=server.createobject("ADODB.recordset")'修改主持人简介
Strsql="select 项目主持人1简介,项目主持人2简介,组织管理方式 from xt_VD_ProjectBasic where 项目编码='"&session("ProjectCode")&"'"
rst.open Strsql,strconn
	if not rst.EOF then
	Person1=rst("项目主持人1简介")
	Person2=rst("项目主持人2简介")
	Manager=rst("组织管理方式")
	end if
set rst1=server.createobject("ADODB.recordset")'读取主要人员简介
Strsql="select * from xt_VD_ProjectPerson where 项目编码='"&session("ProjectCode")&"'order by 人员标志 desc"
	rst1.CursorType =3
	rst1.CursorLocation =3
	rst1.LockType =2
rst1.open Strsql,strconn
	
	if not rst1.EOF then
		if rst1("人员标志") ="1" then '主要负责人
			name1=rst1("姓名")
			sex1=rst1("性别")
			age1=rst1("年龄")
			company1=rst1("单位")
			ZhiWu1=rst1("职务")
			ZhiCheng1=rst1("职称")
			XueLi1=rst1("学历")
			FenGong1=rst1("具体分工")
			TouRu1=rst1("年投入时间")
		end if
		rst1.MoveNext 
 		for i=2 to rst1.RecordCount '其他人员
			if left(rst1("人员标志"),1) ="0" then
			name(i-2)=rst1("姓名")
			sex(i-2)=rst1("性别")
			age(i-2)=rst1("年龄")
			company(i-2)=rst1("单位")
			ZhiWu(i-2)=rst1("职务")
			ZhiCheng(i-2)=rst1("职称")
			XueLi(i-2)=rst1("学历")
			FenGong(i-2)=rst1("具体分工")
			TouRu(i-2)=rst1("年投入时间")
			end if
			rst1.MoveNext 
		next
	end if
end if
%>
<% 

'告诉浏览器用word来显示文档内容
Response.ContentType = "application/msword" 
'文档设定
response.AddHeader "content-disposition", "inline; filename=Apply4.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_4.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='tab-interval:21.0pt;text-justify-trim:punctuation' bgcolor="#FFFFFF">
<div class=Section1 style='layout-grid:15.6pt'> 
  <p class=MsoNormal><span lang=EN-US> &nbsp; <o:p></o:p></span></p>
  <p class=MsoNormal><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=600 style='width:450.0pt;
 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:100.5pt'> 
      <td colspan=9 valign=top style='width:450.0pt;border:solid windowtext .5pt;
  padding:0cm 5.4pt 0cm 5.4pt;height:100.5pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>项目主持人</span><span lang=EN-US>1</span><span
  style='font-family:宋体;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:
  "Times New Roman"'>简介(</span><span lang=EN-US>200</span><span
  style='font-family:宋体;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:
  "Times New Roman"'>字以内):
          </span>
        <p ><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'><%=replace(Person1,chr(10),"<br>")%> </span></p>
      </td>
    </tr>
    <tr style='height:100.5pt'> 
      <td colspan=9 valign=top style='width:450.0pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:100.5pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>项目主持人</span><span lang=EN-US>2</span><span
  style='font-family:宋体;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:
  "Times New Roman"'>简介(</span><span lang=EN-US>200</span><span
  style='font-family:宋体;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:
  "Times New Roman"'>字以内):<br>
          </span> <p><span
  style='font-family:宋体;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:
  "Times New Roman"'><%=replace(Person2,chr(10),"<br>")%></span></p>
      </td>
    </tr>
    <tr style='height:100.5pt'> 
      <td colspan=9 valign=top style='width:450.0pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:100.5pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>项目主持单位采取何种方式组织和管理课题承担单位以确保项目完成(</span><span
  lang=EN-US>200</span><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>字以内):<br>
          </span> <p><span
  style='font-family:宋体;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:
  "Times New Roman"'><%=replace(Manager,chr(10),"<br>")%></span></p>
      </td>
    </tr>
    <tr style='height:23.05pt'> 
      <td colspan=9 style='width:450.0pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt;
  height:23.05pt'> 
        <p class=MsoNormal><span style='font-family:宋体;mso-ascii-font-family:"Times New Roman";
  mso-hansi-font-family:"Times New Roman"'>项目主要人员情况:</span></p>
      </td>
    </tr>
    <tr> 
      <td width=48 valign=top style='width:38.8pt;border:solid windowtext .5pt;
  border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'> 
        <p class=MsoNormal align=center style='text-align:center'> &nbsp; <span
  lang=EN-US><o:p></o:p></span></p>
      </td>
      <td width=66 style='width:51.2pt;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'> 
        <p class=MsoNormal align=center style='text-align:center'><span
  style='font-family:宋体;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:
  "Times New Roman"'>姓名</span></p>
      </td>
      <td width=106 style='width:81.0pt;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'> 
        <p class=MsoNormal align=center style='text-align:center'><span
  style='font-family:宋体;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:
  "Times New Roman"'>单位</span></p>
      </td>
      <td width=36 style='width:36.0pt;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'> 
        <p class=MsoNormal align=center style='text-align:center'><span
  style='font-family:宋体;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:
  "Times New Roman"'>年龄</span></p>
      </td>
      <td width=56 style='width:36.0pt;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'> 

⌨️ 快捷键说明

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