有一个数据库文件有图片的地址和介绍,怎么按照下面的表格输出?

[sailor001]

<table width="100%" border="0" cellpadding="0" cellspacing="0" align="center">
<!--DWLayoutTable-->
<tr>
<td width="25%" height="150" align="center" valign="middle"><img width="100" height="100" border="0"></td>
<td width="25%" align="center" valign="middle"><img width="100" height="100" border="0"></td>
<td width="25%" align="center" valign="middle"><img width="100" height="100" border="0"></td>
<td width="25%" align="center" valign="middle"><img width="100" height="100" border="0"></td>
</tr>
<tr>
<td height="60" align="center" valign="middle">介绍1</td>
<td align="center" valign="middle">介绍2</td>
<td align="center" valign="middle">介绍3</td>
<td align="center" valign="middle">介绍4</td>
</tr>
</table>

[ministry_bill]

dim pic
pic="<tr>"
dim content
content="<tr>"
for i=1 to 4
pic=pic&"<td width=25% height=150 align=center valign=middle><img width=100 height=100 border=0 src="&rs.fields("pic")&"></td>"
content=content&"<td height=60 align=center valign=middle>"&rs.fields(
"content")&"</td>"
rs.movenext
next
pic=pic&"</tr>"
content=content&"</tr>"

[ministry_bill]

当然，还可以改为：
<%
dim pic
pic="<tr>"
dim content
content="<tr>"
sql="select top n(自定) * pic,content from yourtable"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
count=rs.recordcont
if count>0 then
for i=1 to count
if rs.eof then exit for
pic=pic&"<td width="&100/count&"% height=150 align=center valign=middle><img width=100 height=100 border=0 src="&rs.fields("pic")&"></td>"
content=content&"<td height=60 align=center valign=middle>"&rs.fields(
"content")&"</td>"
rs.movenext
next
end if
pic=pic&"</tr>"
content=content&"</tr>"
%>