<%
sPP = server.mappath("/ads/icons")
%>
Click on Image for larger view
Please be patient, there many thumbnails
<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(sPP)
Set ff = f.Files
For Each f1 in ff
response.write("
")
Next
Set ff = nothing
Set f = nothing
set fso = nothing
%>