Asp+bild+filnamn?

Skall du loopa ut något eller bara skriva ut länkarna manuellt, hur hade du tänkt? Känns som detta går att göra på flera sätt. Ge lite exempel Helge!

------------------
If ASPackad date-1 then ASPerin Now

[Redigerat av Jesper T den 12 feb 2002]

?

Detta script plockar fram bild och filnamn på alla GIF och JPG i samma mapp som sidan.

<%
     
Dim strPathInfo, strPhysicalPath
     strPathInfo = Request.ServerVariables("PATH_INFO")
     strPhysicalPath = Server.MapPath(strPathInfo)
     
Dim objFSO, objFile, objFileItem, objFolder, objFolderContents
     Set objFSO = CreateObject("Scripting.FileSystemObject")
     set objFile = objFSO.GetFile(strPhysicalPath)
     set objFolder = objFile.ParentFolder
     set objFolderContents = objFolder.Files 
     
     
     For Each objFileItem in objFolderContents
     
          If Right(objFileItem.Name, 3) = "gif" OR Right(objFileItem.Name, 3) = "jpg" Then
     
               Response.Write "<img src="& objFileItem.Name &"><br>"
               Response.Write objFileItem.Name &"<br><br><br>"
     
          End If
     
     Next
     
%>

------------------
//Palle
www.palleman.nu

Tack så mycket!