Antes que nada queria darte las gracias por tu codigo pero encontre este otro en unas de tus preguntas, aqui esta.
<%
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("data_base.mdb")
set rs = Conn.Execute("select * from fotos")
%>
<table width="489" border="0" cellspacing="0" cellpadding="0">
<tr>
<%cc=0
While Not Rs.EOF
cc=cc+1
%>
<td>
<table border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="../foto/<%=rs("foto")%>" alt="" height="100" width="67" border="0"></td>
</tr>
<tr>
<td><% =Rs("hoj") %></td>
</tr>
</table>
<%
If cc=3 then ' aca le dan la cantidad de columnas que kieres tener
Response.Write("</td><tr>")
cc=0
End If
%>
</td>
<%
Rs.MoveNext
Wend
%>
</tr>
<tr>
<td> </td>
</tr>
</table>
-----------------------------------
Mi problema esta en que las fotos no quieren aparecer
Bueno antes que se me olvide soy chileno, quilpue y como te puedes dar cuenta soy nuevo en esto de ASP.
Mauricio