15. december 2004 - 22:18
Der er
1 løsning
vis billed filer i mappe
hejsa
er der nogen der kan lave dette eller måske ligger inde med koder til følgende :
Vis en liste med navnene i en mappe på alle .jpg og .gif filer.
Ved tryk på et af navnene, skal denne fil åbne sig i et nyt vindue (helst i en anden frame, fx. kaldet pic.
18. december 2004 - 20:22
#1
<%
startFolder="./bil/"
dim folder,folderCol
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
set folder = objFSO.getFolder(server.MapPath(startFolder))%>
Mine Billeder<BR>
<%for each file in folder.Files
if lcase(right(file.name,3))="jpg" or lcase(right(file.name,3))="jpg" then%>
<A href="<%=startFolder%><%=file.name%>" target="_blank"><%=file.name%></A><BR>
<%end if
next
set folder = nothing
set objFSO = nothing
%>
du kan bare ændre navnet på target, nu står den til _blank, det kan du jo bare skifte til navnet på din frame.
Husk at rette stien til billederne øverst