Using the
File System Object
to
Display Directory Content w/Form Interface
:
Click here to test this script.
Code:
Place in the <BODY>:
Highlight
<%dim fsoimage, fsofiles, fsofolder, Directory Directory = "DIRECTORY NAME/" set fsoimage=server.createobject("Scripting.FileSystemObject") set fsofolder=fsoimage.getfolder(server.MapPath(".") & "/" & (Directory)) set fsofiles=fsofolder.files %> <form method=post action="results.asp"> <input type=hidden value="<%=directory%>" name=directory> Files: <SELECT id=select1 name=FileName> <% for each file in fsofiles if right(file.name,NUMBER OF DIGITS COMPRISING FILE EXTENSION)="FILE EXTENSION NAME" then%> <OPTION><%=file.name%></OPTION> <%end if next%> </SELECT> <INPUT type="submit" value="Show File"> </form> <% set fsofolder=nothing set fsoimage=nothing %>
results.asp:
Highlight
<html> <body> File Name: <%=request.form("FileName")%> <p><img src=<%=request.form("Directory") & request.form("FileName")%>> </body> </html>