aqui tengo un ejemplo de lo que quiero, y que supuestamente debería funcionar. Esta es la idea:
<%
Set fs =Server.CreateObject("Scripting.FileSystemObject")
Set carpeta = fs.GetFolder(server.mappath("fotos\chicas\"))
Set directorio = carpeta.Files
Cant=0
For Each foto in directorio
%>
<a href = "javascript
:preview('preview.asp?imagen=<%=foto.na me%>')">
<img src="fotos/chicas/<%=foto.name%>" border=0></a>
</td>
<%
Cant=Cant+1
If Cant Mod KFotos=0 Then
%>
<script language="javascript" type="text/javascript">
function preview (url) {
var v = window.open(url, '_blank', left=0,top=0,width=400,height=500,toolbar=no,locat ion=no,status=yes,
menubar=no,resizable=no,scrollbars=no’)
}
</script>