📄 projectstat2_list(方式一).asp
字号:
<!--#include file="../Include/AdoConn.asp"-->
<!--#include file="../Include/online.asp"-->
<%
dim WhereProjectJD
'根据查询界面，生成where选项。
select case trim(Request.Form ("ProjectJD"))
case ""
WhereProjectJD=" and 项目进度<>'申报'"
case "申报"
WhereProjectJD=" and (项目进度='推荐' or 项目进度='接收')"
case "初审"
WhereProjectJD=" and 项目进度='初审'"
case "专家论证"
WhereProjectJD=" and 项目进度='初审'"
case "立项"
WhereProjectJD=" and 项目进度='立项'"
end select
'创建一记录集
set objres=server.CreateObject ("adodb.recordset")
objres.CursorType =3
objres.CursorLocation =3
objres.LockType =2
'初始化定义
dim Stat_11_all(50)'合计
dim Stat_11_1(50)'浑南
dim Stat_11_2(50)'张士开发区
dim Stat_11_3(50)'农业高新区
dim Stat_11_4(50)'沈河
dim Stat_11_5(50)'和平
dim Stat_11_6(50)'大东
dim Stat_11_7(50)'铁西
dim Stat_11_8(50)'皇姑
dim Stat_11_9(50)'东陵
dim Stat_11_10(50)'于洪
dim Stat_11_11(50)'苏家屯
dim Stat_11_12(50)'新城子
dim Stat_11_13(50)'辽中
dim Stat_11_14(50)'新民
dim Stat_11_15(50)'法库
dim Stat_11_16(50)'康平
dim Stat_11_17(50)'其它
dim Stat_all,Stat_1,Stat_2,Stat_3,Stat_4,Stat_5,Stat_6,Stat_7,Stat_8,Stat_9,Stat_10,Stat_11,Stat_12,Stat_13,Stat_14,Stat_15,Stat_16,Stat_17'总计
stat_all=0
Stat_1=0
Stat_2=0
Stat_3=0
Stat_4=0
Stat_5=0
Stat_6=0
Stat_7=0
Stat_7=0
Stat_8=0
Stat_9=0
Stat_10=0
Stat_11=0
Stat_12=0
Stat_13=0
Stat_14=0
Stat_15=0
Stat_16=0
Stat_17=0
call row(11)
call row(12)
call row(21)
call row(22)
call row(23)
call row(31)
call row(32)
call row(33)
call row(34)
call row(41)
call row(42)
call row(43)
call row(44)
call row(45)
call row(46)
call row(47)
call row(48)
%>
<script language=vbscript runat=server>
function row(rol)
dim strsql
'表二，行一
strsql="select 所在区,count(项目编码) as 总数 from xt_VD_ProjectStat where 项目类别='"&rol&"'"&whereProjectJD&" group by 所在区"
objres.Open strsql,strconn
Stat_11_all(rol)=0
Stat_11_1(rol)=0
Stat_11_2(rol)=0
Stat_11_3(rol)=0
Stat_11_4(rol)=0
Stat_11_5(rol)=0
Stat_11_6(rol)=0
Stat_11_7(rol)=0
Stat_11_8(rol)=0
Stat_11_9(rol)=0
Stat_11_10(rol)=0
Stat_11_11(rol)=0
Stat_11_12(rol)=0
Stat_11_13(rol)=0
Stat_11_14(rol)=0
Stat_11_15(rol)=0
Stat_11_16(rol)=0
Stat_11_17(rol)=0
if not objres.Eof then
for i=1 to objres.RecordCount
select case objres(0)
case "浑南新区"
Stat_11_1(rol)=objres(1)
case "张士开发区"
Stat_11_2(rol)=objres(1)
case "农业高新区"
Stat_11_3(rol)=objres(1)
case "沈河区"
Stat_11_4(rol)=objres(1)
case "和平区"
Stat_11_5(rol)=objres(1)
case "大东区"
Stat_11_6(rol)=objres(1)
case "铁西区"
Stat_11_7(rol)=objres(1)
case "皇姑区"
Stat_11_8(rol)=objres(1)
case "东陵区"
Stat_11_9(rol)=objres(1)
case "于洪区"
Stat_11_10(rol)=objres(1)
case "苏家屯"
Stat_11_11(rol)=objres(1)
case "新城子"
Stat_11_12(rol)=objres(1)
case "辽中"
Stat_11_13(rol)=objres(1)
case "新民"
Stat_11_14(rol)=objres(1)
case "法库"
Stat_11_15(rol)=objres(1)
case "康平"
Stat_11_16(rol)=objres(1)
case "其它"
Stat_11_17(rol)=objres(1)
end select
objres.MoveNext
next
end if
objres.Close
'行，合计
Stat_11_All(rol)=Stat_11_1(rol)+Stat_11_2(rol)+Stat_11_3(rol)+Stat_11_4(rol)+Stat_11_5(rol)+Stat_11_6(rol)+Stat_11_7(rol)+Stat_11_8(rol)+Stat_11_9(rol)+Stat_11_10(rol)+Stat_11_11(rol)+Stat_11_12(rol)+Stat_11_13(rol)+Stat_11_14(rol)+Stat_11_15(rol)+Stat_11_16(rol)+Stat_11_17(rol)
'列，总计
stat_all=stat_all+Stat_11_All(rol)
Stat_1=Stat_1+Stat_11_1(rol)
Stat_2=Stat_2+Stat_11_2(rol)
Stat_3=Stat_3+Stat_11_3(rol)
Stat_4=Stat_4+Stat_11_4(rol)
Stat_5=Stat_5+Stat_11_5(rol)
Stat_6=Stat_6+Stat_11_6(rol)
Stat_7=Stat_7+Stat_11_7(rol)
Stat_8=Stat_8+Stat_11_8(rol)
Stat_9=Stat_9+Stat_11_9(rol)
Stat_10=Stat_10+Stat_11_10(rol)
Stat_11=Stat_11+Stat_11_11(rol)
Stat_12=Stat_12+Stat_11_12(rol)
Stat_13=Stat_13+Stat_11_13(rol)
Stat_14=Stat_14+Stat_11_14(rol)
Stat_15=Stat_15+Stat_11_15(rol)
Stat_16=Stat_16+Stat_11_16(rol)
Stat_17=Stat_17+Stat_11_17(rol)
end function
</script>
<html>
<head>
<title>项目列表</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="/CssLib/CssLink.css">
</head>
<body bgcolor="#FFFFFF" text="#000000" onload="window.top.ProjectMax()">
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="457"><img src="images/Title_MyProject.gif" width="227" height="38">计划类别、技术领域统计表（项目数量）</td>
<td width="50">
<div align="center"><a href="../Project/ProjectStat_Query.asp"><img src="../public/images/query.gif" width="24" height="18" border="0"></a><a href="../Project/ProjectStat_Query.asp><img src="../public/images/query.gif" width="24" height="18" border="0"><br>
</a> <font color="#003399">查询</font></div>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="0" bordercolor="#0099FF" align="center" bgcolor="#006699">
<tr bordercolor="#0099FF" align="center">
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF"> 计划类别</font></td>
<td width="48" height="20" bgcolor="#6699CC"><font color="#FFFFFF">计划层次</font></td>
<td width="43" height="20" bgcolor="#6699CC"><font color="#FFFFFF">合计</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">浑南</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">张士</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">农业</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">沈河</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">和平</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">大东</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">铁西</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">皇姑</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">东陵</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">于洪</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">苏家屯</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">新城子</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">辽中</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">新民</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">法库</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">康平</font></td>
<td width="30" height="20" bgcolor="#6699CC"><font color="#FFFFFF">其他</font></td>
</tr>
<tr bordercolor="#0099FF" bgcolor="#FFFFFF" align="center">
<td rowspan="2" height="16" width="30">应用开发</td>
<td width="48" height="16">重点</td>
<td width="43" height="16"><%=Stat_11_All(11)%></td>
<td width="30" height="16"><%=Stat_11_1(11)%></td>
<td width="30" height="16"><%=Stat_11_2(11)%></td>
<td width="30" height="16"><%=Stat_11_3(11)%></td>
<td width="30" height="16"><%=Stat_11_4(11)%></td>
<td width="30" height="16"><%=Stat_11_5(11)%></td>
<td width="30" height="16"><%=Stat_11_6(11)%></td>
<td width="30" height="16"><%=Stat_11_7(11)%></td>
<td width="30" height="16"><%=Stat_11_8(11)%></td>
<td width="30" height="16"><%=Stat_11_9(11)%></td>
<td width="30" height="16"><%=Stat_11_10(11)%></td>
<td width="30" height="16"><%=Stat_11_11(11)%></td>
<td width="30" height="16"><%=Stat_11_12(11)%></td>
<td width="30" height="16"><%=Stat_11_13(11)%></td>
<td width="30" height="16"><%=Stat_11_14(11)%></td>
<td width="30" height="16"><%=Stat_11_15(11)%></td>
<td width="30" height="16"><%=Stat_11_16(11)%></td>
<td width="30" height="16"><%=Stat_11_17(11)%></td>
</tr>
<tr bordercolor="#0099FF" bgcolor="#FFFFFF" align="center">
<td width="48" height="16">启动</td>
<td width="43" height="16"><%=Stat_11_All(12)%></td>
<td width="30" height="16"><%=Stat_11_1(12)%></td>
<td width="30" height="16"><%=Stat_11_2(12)%></td>
<td width="30" height="16"><%=Stat_11_3(12)%></td>
<td width="30" height="16"><%=Stat_11_4(12)%></td>
<td width="30" height="16"><%=Stat_11_5(12)%></td>
<td width="30" height="16"><%=Stat_11_6(12)%></td>
<td width="30" height="16"><%=Stat_11_7(12)%></td>
<td width="30" height="16"><%=Stat_11_8(12)%></td>
<td width="30" height="16"><%=Stat_11_9(12)%></td>
<td width="30" height="16"><%=Stat_11_10(12)%></td>
<td width="30" height="16"><%=Stat_11_11(12)%></td>
<td width="30" height="16"><%=Stat_11_12(12)%></td>
<td width="30" height="16"><%=Stat_11_13(12)%></td>
<td width="30" height="16"><%=Stat_11_14(12)%></td>
<td width="30" height="16"><%=Stat_11_15(12)%></td>
<td width="30" height="16"><%=Stat_11_16(12)%></td>
<td width="30" height="16"><%=Stat_11_17(12)%></td>
</tr>
<tr bordercolor="#0099FF" bgcolor="#FFFFFF" align="center">
<td rowspan="3" height="16" width="30">科技攻关</td>
<td width="48" height="16">重大 <br>
</td>
<td width="43" height="16"><%=Stat_11_All(21)%></td>
<td width="30" height="16"><%=Stat_11_1(21)%></td>
<td width="30" height="16"><%=Stat_11_2(21)%></td>
<td width="30" height="16"><%=Stat_11_3(21)%></td>
<td width="30" height="16"><%=Stat_11_4(21)%></td>
<td width="30" height="16"><%=Stat_11_5(21)%></td>
<td width="30" height="16"><%=Stat_11_6(21)%></td>
<td width="30" height="16"><%=Stat_11_7(21)%></td>
<td width="30" height="16"><%=Stat_11_8(21)%></td>
<td width="30" height="16"><%=Stat_11_9(21)%></td>
<td width="30" height="16"><%=Stat_11_10(21)%></td>
<td width="30" height="16"><%=Stat_11_11(21)%></td>
<td width="30" height="16"><%=Stat_11_12(21)%></td>
<td width="30" height="16"><%=Stat_11_13(21)%></td>
<td width="30" height="16"><%=Stat_11_14(21)%></td>
<td width="30" height="16"><%=Stat_11_15(21)%></td>
<td width="30" height="16"><%=Stat_11_16(21)%></td>
<td width="30" height="16"><%=Stat_11_17(21)%></td>
</tr>
<tr bordercolor="#0099FF" bgcolor="#FFFFFF" align="center">
<td width="48" height="16">重点<br>
</td>
<td width="43" height="16"><%=Stat_11_All(22)%></td>
<td width="30" height="16"><%=Stat_11_1(22)%></td>
<td width="30" height="16"><%=Stat_11_2(22)%></td>
<td width="30" height="16"><%=Stat_11_3(22)%></td>
<td width="30" height="16"><%=Stat_11_4(22)%></td>
<td width="30" height="16"><%=Stat_11_5(22)%></td>
<td width="30" height="16"><%=Stat_11_6(22)%></td>
<td width="30" height="16"><%=Stat_11_7(22)%></td>
<td width="30" height="16"><%=Stat_11_8(22)%></td>
<td width="30" height="16"><%=Stat_11_9(22)%></td>
<td width="30" height="16"><%=Stat_11_10(22)%></td>
<td width="30" height="16"><%=Stat_11_11(22)%></td>
<td width="30" height="16"><%=Stat_11_12(22)%></td>
<td width="30" height="16"><%=Stat_11_13(22)%></td>
<td width="30" height="16"><%=Stat_11_14(22)%></td>
<td width="30" height="16"><%=Stat_11_15(22)%></td>
<td width="30" height="16"><%=Stat_11_16(22)%></td>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -