想问一下，列表的问题？谢

这是动态生成一个，按
－第一级（点第一级显示下面子分类）
第一级子分类
.
.
.

－第二级（点第二级显示下面子分类）
第二级子分类1
第二级子分类1
.
.
.
纵向排列的，现在我要横向排列要怎么做，下面的纵向的代码，现在我要想改成横向的要怎么办？高手指点，谢谢！


<%
sql="select * from productSort where fatherID=0"
set sortRootRs=conn.execute (sql)
i=0
do while not (sortRootRs.eof or err)
sortRootRsID=sortRootRs("id")
response.write "<a href='Javascript:onChange("&sortRootRsID&")'>"&sortRootRs("name")&"</a>   |   <span id=child"&sortRootRsID&" style='display:none'>"
sql="select * from productSort where fatherID="&sortRootRs("id")
set sortChildRs=server.createObject("adodb.recordset")
sortChildRs.open sql,conn,1,1
j=1
k=sortchildRs.recordcount
do while not (sortChildRs.eof or err)
if j=k then
response.write " "
else
response.write " "
end if
response.write " <a href=product.asp?productSort="&sortChildRs("id")&">"&sortChildRs("name")&"</a>|"
j=j+1
if j>100 then exit do
sortChildRs.moveNext
loop
response.write "</span>"
i=i+1
if i>100 then exit do
sortRootRs.moveNext
loop
%>