<script language="JavaScript">
function abrir_img(pagina)
{
vimagen=window.open(pagina,"vimagen","width=300, height=300, top=100, left=150");
vimagen.focus();
}
</script>
<table BORDER=0 CELLSPACING=6 CELLPADDING=6 COLS=1 WIDTH="100%" height="100%" >
<tr>
<td VALIGN=TOP ALIGN="center">
<%
dir="fotos" 'carpeta con las fotos
dirp="fotosp" 'carpeta con las fotos pekeñas para ke carge rapido
cont=1
Set Mi_directorio=Server.CreateObject("Scripting.FileS ystemObject")
Set mis_archivos=Mi_directorio.GetFolder(Server.MapPat h(dir))
For Each archivo_encontrado In mis_archivos.files
response.write "<a href=" & "javascript
:abrir_img('popupfoto.asp?cod=" & dir & "/" & archivo_encontrado.Name & "')" & ">"
%>
<img height="100" src="<%=dirp%>/<% =archivo_encontrado.Name %>" alt="<% =archivo_encontrado.Name %>" border=0></a>
<%
if cont=3 then
response.write "<br>"
cont=1
else
cont=cont+1
end if
%>
<%
Next
%>
</td>
</tr>
</table>
Espero ke os sirva esta todo dontro del mismo TD, pero no os llevara mucho curro poner cada foro en una celda si es lo ke kereis.