rstotab.asp

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

ASP
36
字号

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<%
function rstotab(rs){
		var n=0
		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("</tr>");
		
      while(!rs.Eof)
{
	for(i=0;i<rs.Fields.Count;i++)
	{
		Response.Write("<td>"+rs(i)+"</td>");
	}
	Response.Write("</tr>");
	rs.movenext();
	n+=1
	}
	Response.Write("</table>");
	Response.Write("共搜索到"+n+"条记录!")
	}
	%>
</body>
</html>

⌨️ 快捷键说明

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