Avatar billede gruppe422 Nybegynder
05. november 2002 - 20:59 Der er 2 kommentarer og
1 løsning

Har brug for HJÆLP.....

Hej

Her er et script til et foto album i ASP som jeg har fundet. Men jeg kunne godt tænke mig noget hjælp til at lave det om.

1. Billedet skal poppe op i et nyt vindue.
2. klikke på billedet for at lukke/vende tilbage
3. Sammen med knappen "frem" og "tilbage", må der godt stå hvor mange sider der er? 1,2,3,4 osv.

Håber der er nogle der kan hjælpe mig...

-------------------------

<html>
<head>
<title></title>
</head>

<body bgcolor="A0B3C8">
<div align="center">

<table width="100%" border="0">
<%
billedeSti = "./foto/"
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="0" 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("&nbsp;")
  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>
Avatar billede webmasterdk Praktikant
05. november 2002 - 21:32 #1
Brug for hjælp? til en ordentlig overskrift? sal du få!
Hjælp til fotoalbum i asp
Avatar billede gruppe422 Nybegynder
05. november 2002 - 22:22 #2
ok, sorry
Avatar billede gruppe422 Nybegynder
07. november 2002 - 21:57 #3
lukket
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester