一个在N列的形式显示ASP的记录方法

定义变量
昏暗的cn，RS，SQL
SQL =CustomerID选择从订单
总记录数
昏暗的totalnumbe
集CN = server.createobject（数据连接）
cn。打开供应商= SQLOLEDB。1；用户ID = SA；初始目录=数据；数据源；密码=。=；
集= server.createobject（ADODB。记录集）
的。打开SQL，CN，3, 1
rs.recordcount总数=
如果总数= 0
响应。写入没有记录输出。
其他的
昏暗的JJ，nleft，CCOL
JJ = 0
NcoI = 415
nleft = ncol -（总数mod ncol）
如果nleft = ncol然后nleft = 0
响应。写vbcrlf
而not rs.eof
响应。写RS（CustomerID）vbcrlf
如果（JJ MOD ncol）=（ncol - 1）和JJ总数1响应。写<>vbcrlf
如果（JJ MOD ncol）=（ncol - 1）和JJ = totalnumber-1然后响应。写vbcrlf
如果（JJ MOD ncol）=（ncol - 1）然后
如果JJ <>总数- 1
响应。写vbcrlf
其他的
响应。写vbcrlf
最后如果
最后如果
JJ + JJ + 1
移到下一项
走
如果nleft和nleft ncol然后<> <> 0
If nCol < TotalNumber Then
我nleft = 1
响应。写vbcrlf
下一个
最后如果
响应。写vbcrlf
最后如果
响应。写
最后如果
关闭
设置=无
cn。关闭
设置cn
反应结束