横向显示循环数据

原创 2016年06月02日 12:43:35
<!--#include file="include/buyok_shop_30_conn.asp" -->
<%
Dim rs2
Dim rs2_numRows

Set rs2=Server.CreateObject("ADODB.Recordset")
sql="select * from buyok_class"
rs2.open sql,conn,1,3

rs2_numRows = 0
%>
<%
Dim HLooper1__numRows
HLooper1__numRows = -5
Dim HLooper1__index
HLooper1__index = 0
rs2_numRows = rs2_numRows + HLooper1__numRows
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <table>
      <%
startrw = 0
endrw = HLooper1__index
numberColumns = 5
numrows = -1
while((numrows <> 0) AND (Not rs2.EOF))
 startrw = endrw + 1
 endrw = endrw + numberColumns
 %>
      <tr align="center" valign="top">
        <%
While ((startrw <= endrw) AND (Not rs2.EOF))
%>
        <td>
        <td> ⊙ <%=(rs2.Fields.Item("LarCode").Value)%></td>
        </td>
        <%
 startrw = startrw + 1
 rs2.MoveNext()
 Wend
 %>
      </tr>
      <%
 numrows=numrows-1
 Wend
 %>
    </table>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>
</body>
</html>
<%
rs2.Close()
Set rs2 = Nothing
%>
版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

保存图片到本地,查看本地图片,递归实现scrollView的无限循环滚动,文字横向渐变效果,autoLayout

// // ViewController.m // DiGui // // Created by test on 16/3/28. // Copyright © 2016年 Zhou. All...

横向无限循环的筛选组件

  • 2017-07-20 18:48
  • 26.53MB
  • 下载

Recyclerview列表,item嵌套横向Gridview 解决滑动冲突,数据加载问题

recyclerview列表数据,每个item 嵌套横向滑动GridView的问题, 这几天新需求,列表加载用户关注的人物,一页15条数据,,,,,,。然后每个人物 都有自己的一系列作品,要在人物头像...

WEB横向循环滑动

  • 2016-08-19 00:22
  • 4.12MB
  • 下载

android学习笔记之:利用listview达到表格数据横向排列的效果

一、实现效果如下图 二、两种实现方法 1.通过list数据源在textview中进行横向赋值操作。 Layout coding: <Lin...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)