Udskrivning af filer

godt nok er dette eksempel beregnet til billeder - men mon ikke du kan omskrive det;

<%
ImageDir = "/images/linkbanners/"
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder(Server.MapPath(ImageDir))
Set objFiles = objFolder.Files
Response.Write "<p>Der er " & objFiles.Count & " billeder i dette bibliotek</p>"
For Each Image In objFiles
    Response.Write "<p><img src=" & ImageDir & Image.Name & "><br>"   
Next
Set objFS = Nothing
%>