Hej NG...
Jeg er ved at lave et lille galleri og har fået lavet sådan at, jeg
kan få vist samtlige billeder af typen jpg på min side, men hvis jeg
gerne vil bruge det første billede (eller et tilfældigt for den sags
skyld), hvordan gør jeg det??
Koden der viser samtlige billeder:
<%
ASPDir = Request.Querystring("mappe")
Response.Write (" <h1>Billeder fra mappen: "&ASPDir&" <h1> <hr> ")
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder(Server.MapPath(ASPDir))
Set objFiles = objFolder.Files
For Each ASPFile In objFiles
If right(ASPFile.Name, 3) = "JPG" OR right(ASPFile.Name, 3) = "jpg"
Then
Response.Write (" <img src="""&(ASPDir)&"\"&(ASPFile.Name) &"""> <br>")
end if
Next
Set objFS = Nothing
%>
På forhånd tak!