Visning af billeder i en folder

Hejsa

Jeg har fået fat i et lille script som viser en række billeder i den samme mappe.

Jeg er ikke så pokkers god til ASP og skal derfor bruge følgende:

Scriptet skal vise alle billederne i en anden mappe og altså ikke den samme mappe, som det gør nu.

Ydermere vil jeg gerne have det således at filnavnene ikke bliver vist, men kun billednavnene.

Er der en ørn der kan rette det i scriptet? ;)

På forhånd mange taxi. :)
______________________________________________
<% strPathInfo = Request.ServerVariables("PATH_INFO")
strPhysicalPath = Server.MapPath(strPathInfo)

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(strPhysicalPath)
Set objFolder = objFile.ParentFolder
Set objFolderContents = objFolder.Files

For Each objFileItem in objFolderContents
    Response.write "<img src="
    Response.Write(objFileItem.Name)
    response.write " border=1><br>"
    Response.Write(objFileItem.Name & "<br>")
    Response.write "</a>"
Next %>
_________________________________________________