UC知道ASP 实现分列
来源：百度知道 编辑：UC知道 时间：2024/06/06 18:13:35
下面的一段代码只能是这样显示
a
b
c
d
e
f
我想让它变成两列的
a b
c d
e f
求高手们帮帮忙了，下面的代码如何修改，先谢谢了 !
if request("cpid")<>"" then
sql1="select * from ......................."
else
sql1="select * from ......................."
end if
rs1.open sql1,conn,1,1
if not rs1.eof then
'分页的实现
listnum=3
Rs1.pagesize=listnum
page=Request("page")
if (page-Rs1.pagecount) > 0 then
page=Rs1.pagecount
elseif page = "" or page < 1 then
page = 1
end if
Rs1.absolutepage=page
'编号的实现
j=rs1.recordcount
j=j-(page-1)*listnum
i=0
do while not rs1.eof and i<listnum
cocp=cocp&"<table width=100% border=0 cellspacing=0 cellpadding=5><tr><td width=80 height=90 align=center>"
cocp=cocp&"<a href=....................
a
b
c
d
e
f
我想让它变成两列的
a b
c d
e f
求高手们帮帮忙了，下面的代码如何修改，先谢谢了 !
if request("cpid")<>"" then
sql1="select * from ......................."
else
sql1="select * from ......................."
end if
rs1.open sql1,conn,1,1
if not rs1.eof then
'分页的实现
listnum=3
Rs1.pagesize=listnum
page=Request("page")
if (page-Rs1.pagecount) > 0 then
page=Rs1.pagecount
elseif page = "" or page < 1 then
page = 1
end if
Rs1.absolutepage=page
'编号的实现
j=rs1.recordcount
j=j-(page-1)*listnum
i=0
do while not rs1.eof and i<listnum
cocp=cocp&"<table width=100% border=0 cellspacing=0 cellpadding=5><tr><td width=80 height=90 align=center>"
cocp=cocp&"<a href=....................
我给一段你,你自己想下你的要怎么改.
for i=1 to rs.recordcount/2+1
for j=1 to 2
response.write i
rs.movenext
next
next
没看懂你的代码，好象里面没输出的东西
不过HTML里“<br>”是换行，本来是每输出一个就加一个<br>来换行，你只要加一个变量来控制<br>的输出就好了，比如定义一个"j"，初始j的值，每输出一个记录就+1，然后判断j的奇偶就可以知道是不是输出2个了，是的话就输出<br>
具体代码怎么写就自己想吧，很多东西自己实践过才最有用