outcounttongji.asp

来自「仓库管理实现包括入库、出库、盘存、统计等功能」· ASP 代码 · 共 49 行

ASP
49
字号
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<!--#include file="connect.asp"-->

<body>
<div align="center">
  <p>出库信息统计</p>
    <%
		query()
		  
		function query(){		
		var sql="Select * from outcountinfo"
		rs=conn.Execute(sql)
		rstotab(rs)
		conn.close()
		}
		
		function rstotab(rs){
		Response.Write("<table border=1 align='center'>");
        Response.Write("<tr>");
       for(i=0;i<rs.Fields.Count;i++){
		Response.Write("<td>"+rs(i).Name+"</td>");
	}
	    Response.Write("<td></td>");
	    Response.Write("</tr>");
      while(!rs.Eof)
{
	for(i=0;i<rs.Fields.Count;i++)
	{
	    if(i!=5)
		Response.Write("<td>"+rs(i)+"</td>");
	}	
	Response.Write("<td><a href='xiangxi.asp?gid="+rs(i-5)+"&gname="+rs(i-4)+"&gunit="+rs(i-1)+"'>查询详情</a></td>")
	Response.Write("</tr>");
	rs.movenext();
	}
	Response.Write("</table>");
	}		
		%>
		<%="<br><a href='tongji.asp'>返回</a>"%>
  </p>
</div>
</body>
</html>

⌨️ 快捷键说明

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