?? pcstat.asp
字號(hào):
<!--#include file="pcdb.asp"-->
<%
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from 設(shè)備資源 "
rs.open sql,conn,1,1
macnum=rs.Recordcount
rs.close
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select 部門(mén) , count(*) as num1 from 設(shè)備資源 Group by 部門(mén)"
rs.open sql,conn,1,1
alls=rs.Recordcount
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
BODY {
font-family: "宋體";
font-size: 9pt; }
p { font-family: "宋體", "Arial", "Times New Roman"; font-size: 9pt; font-weight: normal}
A:hover {text-decoration:none;color: #FF8040;}
A{text-decoration:none;color: #006ad5;}
-->
</style>
<title>統(tǒng)計(jì)報(bào)告:綜合分析</title>
</head>
<BODY bgcolor="White" text="#000000" style="margin-left:3px;margin-top: 3px" topmargin="0" leftmargin="0" marginheight="0" marginwidth="0" link="#0072E3" vlink="#0072E3" >
<table WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0">
<tr>
<th NOWRAP BGCOLOR="Silver" BACKGROUND="images/navtop.jpg"><font SIZE="6"> 固定資產(chǎn)匯總管理 </font>
</th>
<td ALIGN="Right" BGCOLOR="Silver" VALIGN="MIDDLE" WIDTH="100%" BACKGROUND="images/navtop.jpg"></td>
</tr>
<tr>
<td BGCOLOR="#FFFFCC" COLSPAN="2"><font SIZE="-1"> </font></td>
</tr>
<tr>
<td COLSPAN="2"><font SIZE="-1"> </font></td>
</tr>
</table>
<div align="center"><center>
<table border="0" cellpadding="0" cellspacing="0" width="544">
<tr>
<td width="494" valign="bottom" bgcolor="#E2EABF"></td>
<td width="50"></td>
</tr>
<tr>
<td bgcolor="#E2EABF"><p align="center"><span class="sureyeah"><span class="sureyeah"><br>
</span></span></p>
<p align="center"></p>
<div align="center"><div align="center"><div align="center"><center><table border="0%" cellspaccing="2" cellpadding="2" width="80%">
<tr>
<td><table width="100%" bordercolor="#336600" border="1" cellspacing="0" cellpadding="0" bordercolordark="#666666" bordercolorlight="#CCCCCC">
<tr>
<td><table border="0" cellspacing="0" cellpadding="3">
<tr bgcolor="#336600">
<td colspan="4" align="CENTER" bgcolor="#336600"><font color="#FFFFFF">數(shù) 據(jù) 統(tǒng) 計(jì) 分 析</font></td>
</tr>
<tr bgcolor="#cccccc">
<td align="LEFT" width="30%"><p class="sureyeah" align="center">部門(mén) </td>
<td align="LEFT" width="20%"><p align="center">機(jī)器數(shù)量 </td>
<td align="right" width="10%"><p align="right">比率 </td>
<td align="right" width="40%"><p align="center">圖示 </td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="LEFT" width="30%"><p align="center">合計(jì) </td>
<td align="LEFT" width="20%"><p align="center"><% =macnum%></td>
<td align="right" width="10%"><p align="center">100%</td>
<td align="right" width="40%" bgcolor="#FFFFFF"><p align="left"><img src="images/redvert.gif" height="10" width="150" > </td>
</tr>
<%
for i=1 to alls
if RS.EOF then exit for
%>
<tr bgcolor="#FFFFFF">
<td align="LEFT" width="30%"><p align="center"><% =rs("部門(mén)")%> </td>
<td align="LEFT" width="20%"><p align="center"><% =rs("num1")%></td>
<td align="right" width="10%"><p align="center"><% =int((rs("num1")/macnum)*1000)/10%>%</td>
<td align="right" width="40%" bgcolor="#FFFFFF"><p align="left"><img src="images/redvert.gif" height="10" width="<% =int((rs("num1")/macnum)*150)%>" > </td>
</tr>
<%
RS.MoveNext
next
RS.close
%>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</center></div><p align="center"><a href="pc.asp">返回</a> </p>
</div><p align="center"> </p>
</div></td>
<td width="50" valign="top"><br clear="all">
</td>
</tr>
<tr>
<td valign="bottom" class="paper" bgcolor="#E2EABF" height="2"></td>
</tr>
</table>
</center></div>
</body>
</html>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -