Så prøv den her herunder. Det er ikke noget jeg har lavet, men er af eagleeye og stammer fra
http://eksperten.dk/spm/356268Her er et med paging så du kan angive hvor mange billeder du vil havde vist pr side og hvor mage du vil havde vist pr række.
1. viser billeder i en undermappe
Stien angive i denne variable:
billedeSti = "./hyttetur/"
2. laver thumbnails af billeder
I øjeblikket er laver den dem on til størrelsen WIDTH="116" HEIGHT="82"
3. ved klik vises billedet i normal størrelse på samme side
4. Paging så du kan bestemme hvor mange biller du vil havde vist pr side. Det kan angives i denne variable:
antalBillederPrSide = 6
<html>
<head>
<title></title>
</head>
<body bgcolor="A0B3C8">
<div align="center">
<table width="100%" border="0">
<%
billedeSti = "./hyttetur/"
antalBillederPrSide = 6
antalBillederPrRekke = 3
if Request.QueryString("billede") = "" then
start = request.querystring("start")
if start = "" then start = 0
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(server.mappath(billedeSti))
Set fc = f.Files
For Each billed in fc
arrayBuild = arrayBuild & billed.name & "|"
next
arrayBuild = left(arrayBuild, (len(arrayBuild) - 1))
myArray = Split(arrayBuild, "|")
Antalsider = int(ubound(myarray) / antalBillederPrSide)
antal = 0
for i = start to (start + antalBillederPrSide-1)
if not i > ubound(myarray) then
if antal = 0 then Response.Write "<TR>"
%>
<td width="<%=Int(antalBillederPrRekke/100)%>"><p align="center">
<a href="?billede=<%=billedeSti%>/<%=myArray(i)%>">
<img SRC="<%=billedeSti%>/<%=myArray(i)%>" border="1" color="black" WIDTH="116" HEIGHT="82">
</a></td>
<%
else
nesteside = 1
end if
antal = antal + 1
if antal = 3 then
Response.Write "</TR>"
antal = 0
end if
next
if antal > 0 then Response.Write "</TR>"
%>
</table>
<center>
<%
if start <> 0 then
response.write "<a href=""?start=" & (start - 6) & """>Forrige</a>"
end if
response.write(" ")
if nesteside <> 1 then
response.write "<a href=""?start=" & (start + 6) & """>Næste</a>"
end if
%>
</center>
<%
else
'Vis billedet
%>
<tr><td align="center">
<img SRC="<%=Request.QueryString("billede")%>" border="1">
<p align="center"><a href="java script:history.back();">Tilbage</a></p>
</td>
</tr>
</table>
<%
end if %>
</div>
</body>
</html>
/Goose
Ny bruger
Nybegynder
Opret
Preview
