为什么硅胶勺子会变色:修改数据显示的列数：如何让1列内容，显示为2列显示？

下面这段程序从数据库读出来的数据，是从上到下单列显示，把整个网页拉伸的非常大！（是指大分类）
如何修改后，大分类 内容是双列显示？
请大家帮忙看一下

<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="F1F0ED">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="20">
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from shop_anclass order by anclassidorder",conn,1,1
if rs.recordcount=0 then
response.write "<br>目前没有商品分类"
else
while not rs.eof
%>
<table width=100% cellspacing="0" cellpadding="0" border="0">
<tr bgcolor="#F1F0ED">
<td height="22" colspan=2 background="images/fl-bg.gif"><font color="#FF6600">   <a href="class.asp?lx=big&anid=<%=rs("anclassid")%>"><b><font color="#F1F0ED"><%=rs("anclass")%></font></b></a></font></td>
</tr>
<%
set rs_s=server.CreateObject("adodb.recordset")
rs_s.open "select * from shop_nclass where anclassid=" & rs("anclassid") & " order by nclassidorder",conn,1,1
if rs_s.recordcount=0 then
%>
<tr>
<td colspan=2 height="22">   暂无小分类</td>
</tr>
<%
else
i=0
while not rs_s.eof
%>
<tr>
<td align=right width=49% height="22"><a href="class.asp?lx=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><%=rs_s("nclass")%></a></td>
<%rs_s.movenext
if rs_s.eof then
response.write "<td align=center> </td></tr>"
else
%>
<td align=left width=51% height="22"><font color="#FF6600">|</font> <a href="class.asp?lx=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><%=rs_s("nclass")%></a></td>
</tr>
<%
rs_s.movenext
end if%>
<%
wend
end if
%>
<tr>
<td colspan=2 height=1 background="images/bj_x1.gif" ></td>
</tr>
</table>
<%
rs_s.close
set rs_s=nothing
rs.movenext
wend
end if
rs.close
set rs=nothing
%>
</td>
</tr>
</table>
</td>
</tr>
</table>
这个问题好象不热门哦，怎么没多少人说说呢；还是不会没看到啊

不行，打开网页时，出现以下错误：（其中fenleiinfo.asp为该文件的文件名）

Microsoft VBScript 编译器错误 错误 '800a0408'

无效字符

/fenleiinfo.asp，行 17

Response.Write(rs("anclassid")% >"><b><font color="#F1F0ED"><%=rs("anclass")% ></font></b></a></font></td> </tr> <% set rs_s=server.CreateObject("adodb.recordset") rs_s.open "select * from shop_nclass where anclassid=" & rs ("anclassid") & " order by nclassidorder",conn,1,1 if rs_s.recordcount=0 then)
------------------------------^