📄 ri1.asp

📁 企业信息化管理系统：针对的是一个计算机配件生产公司为背景实现的。
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<!--#include file="Connections/auto.asp" -->
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from ri where year='"&request("year")&"' and month='"&request("month")&"' order by date desc"

rs.open sql,CN,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/MainBorder.css" rel="stylesheet" type="text/css">
<title>无标题文档</title>
<style type="text/css">
<!--
body,td,th {
	font-size: 12px;
}
a:link {
	color: #000000;
	text-decoration: none;
}
a:visited {
	color: #000000;
	text-decoration: none;
}
a:hover {
	color: #CCCCCC;
	text-decoration: none;
}
a:active {
	color: #CCCCCC;
	text-decoration: none;
}
body {
	background-color: #ffffff;
}
.style3 {
	color: #000000;
	font-size: 16px;
	font-weight: bold;
}
.style4 {color: #000000}
.style5 {color: #FFFFFF}
-->
</style>
</head>

<body>
<table width="216" height="54">
<tr>
<td></td>
<tr>
</tr>
</tr>

</table>
<table width="540" height="174" border="0" align="center" cellspacing="1" bgcolor="#0066CC">
  <tr>
    <td height="77" colspan="6" ><div align="center" class="style3 style5 style5">计算机主板、配件运行日报表</div></td>
  </tr>  <tr >
    <td width="116" height="32"  class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but'"><div align="center" class="style4 style5">日期 </div></td>
    <td width="140"class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but'" ><div align="center" class="style4 style5">主板（单位：件）</div></td>
    <td width="156"class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but'"><div align="center" class="style4 style5">鼠标（单位：件）</div></td>
    <td width="76"  class="but01 style5" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but'"><div align="center" class="style5">运行情况</div>      
    <div align="center" class="style4"></div></td>
   
  </tr>
	<%
	if not rs.eof then
	zong=rs.recordcount
	
	for i=1 to zong
	
	%>
  <tr>
    <td height="30"class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'"><div align="center"><%=rs("date")%></div></td>
    <td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'"><div align="center"><%= rs("mainboard") %>&nbsp;</div></td>
    <td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'"><div align="center"><%= rs("mouse") %></div></td>
    <td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'"><div align="center"><%= rs("yun") %></div></td>
  </tr>
  <%
  rs.movenext
  if rs.eof then exit for 
  next
  else 
 response.Write("暂无信息")
 end if 
  %>
   <tr bgcolor="#FFFFFF">
    <td height="30" colspan="6"><table width="100%" border="0">
      <tr>
        <td width="16%"> 　　【<a href=javascript:window.print();>打印</a>】</td>
        <td width="84%"><div align="right"></div></td>
      </tr>
    </table></td>
  </tr>
</table>
</body>
</html>
⌨️ 快捷键说明

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