Thumbnail generator
Jeg har følgende script men det virker ikke hvis jeg propper det ind i mapper...Jeg har lagt det ud på http://www.reffot.dk/exp/ hvor jeg også har smidt nogle billeder i. Men når man så går ind på siden viser den selve reffot.dk og ikke exp... Hvad skal ændres for at den viser thumbnails af billederne i exp...?
<body>
<%
thumbwidth = "30"
thumbheight = "30"
Set fs = Server.CreateObject( "Scripting.FileSystemObject" )
Set myFolder = fs.GetFolder( Request.ServerVariables("APPL_PHYSICAL_PATH") )
%>
<TABLE WIDTH="100%">
<% For Each thing in myFolder.Files %>
<% If Right(thing.Name,4) = ".gif" Or Right(thing.Name,4) = ".jpg" Then %>
<tr>
<td WIDTH="30%" align="left"><a href="<%= thing.Name%>"><img src="<%= thing.Name%>" border="0" alt="<%=thing.Name%>" width="<%= thumbwidth %>" height="<%= thumbheight %>"><%=thing.Name%></a></td>
</tr>
<% End If %>
<% Next %>
</table>
<BR>
</body>
