automatisk opdate af billeder

Ja da!
- det er jo bare en hurtig FSO... noget i den stil her:

<%
DinMappe = "billeder"
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.GetFolder(server.mappath(DinMappe))
for each file in f.files
filename = file.name
ext = lcase(right(filename,3))
if (ext = "jpg" OR ext = "gif") then
%>
<img src="<%=DinMappe & "/" & filename%>">
<%
end if
next
set f=nothing
set fs=nothing
%>


- dette script viser KUN *.jpg filer og *.gif filer - men dette kan sagtens udvides...

\Dan

kiker på det i weekenden