数据显示的问题。急。。。

我有一表里有很多记录：
id name oicq age
001 wang 212 12
002 yang 112 21
003 li 212 31
.........................
.........................
怎样把数据库里记录用表格的形式出来呀。

我要它把结果自动的生成表格形式。也就是说不管数据库里有多少
条记录 都能让它自动以表格的形式，显示出来（并不是在已有的表格中插入代码来控制）。但我就是不知怎么来用语
句控制它。

---------------------------------------------------------------

1   
2...   
3sql="select * from 表 order by id desc"   
4rs.open sql,conn,1,1   

1<table>   

do while not rs.eof

 1<tr>   
 2姓名：<td>```
 3=rs("name")
 4```</td>   
 5OICQ:：<td>```
 6=rs("OICQ")
 7```</td>   
 8年龄：<td>```
 9=rs("age")
10```</td>
11</tr>   

rs.MoveNext
Loop
rs.close

1</table>