Först undrar jag hur koden skall se ut för att lista alla *.jpg filer som ligger i en map på servern.
Den skall listas ut så här:
'bild1.jpg','bild2.jpg', osv
Sen undrar jag om det funkar att göra en kod som visar en vald *.jpg bild om bilden finns på servern i en vald mapp.
Typ:
På index.asp har jag en stor bild som heter bild.jpg. Om jag tar bort bild.jpg från mappen bilder/ på webbservern så skall index.asp ej visa bilden bild.jpg.
set fso = server.createobject("scripting.filesystemobject")
set folder = fso.getFolder(server.mappath("./"))
for each file in folder.files
response.write file.name & "<br>"
next
set folder = nothing
set fso = nothing
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.GetFolder(server.mappath("bilder/"))
set Files = Folder.Files
For each Item In Files
if right(Item.Name,4) = ".jpg" then
response.write file.name & "<br>"
end if
Next
set Folder = nothing
set FSO = nothing
set Files = nothing
<%
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.GetFolder(server.mappath("bilder/"))
set Files = Folder.Files
For each Item In Files
if right(Lcase(Item.Name,4)) = ".jpg" then
Dim strFileName
strFileName = file.name
response.write "<img src ='"& strFileName &"'><br>"&_
"<font size='1' face='Verdana,Arial,Helvetica,sans-serif'><b>"&_
strFileName &"</b></font><br>"
end if
Next
set Folder = nothing
set FSO = nothing
set Files = nothing
%>
/ Mikul
250 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
