18. februar 2002 - 22:39Der er
17 kommentarer og 1 løsning
Fotoalbum
Hejsa,
Jeg skal bruge et fotoalbum i asp... jeg skal kunne angive en sti hvor mine billeder ligger, og disse skal så vises i en tabel med thumbnails... når man klikker på disse thumbnails skal det pågældende billede vises i fuld størrelse i et popupvindue med en "luk vindue" knap.
Set fs = Server.CreateObject( "Scripting.FileSystemObject" ) folder = Server.Mappath("pics/") Set myFolder = fs.GetFolder(folder) %>
<TABLE WIDTH="100%"> <% For Each thing in myFolder.Files %> <% If Right(thing.Name,4) = ".gif" Or Right(thing.Name,4) = ".jpg" Then %> <tr> <td WIDTH="30%" align="left"><a href="<%=folder%>/<%=thing.Name%>"><img src="<%=folder%>/<%=thing.Name%>" border="0" alt="<%=thing.Name%>" width="<%= thumbwidth %>" height="<%= thumbheight %>"><%=thing.Name%></a></td> </tr> <% End If %> <% Next %> </table> <BR>
Set fs = Server.CreateObject( "Scripting.FileSystemObject" ) folder = Server.Mappath("pics/") Set myFolder = fs.GetFolder(folder) %>
<TABLE WIDTH="100%"> <% For Each thing in myFolder.Files %> <% If Right(thing.Name,4) = ".gif" Or Right(thing.Name,4) = ".jpg" Then %> <tr> <td WIDTH="30%" align="left"><a href="<%=thing.Name%>"><img src="<=thing.Name%>" border="0" alt="<%=thing.Name%>" width="<%= thumbwidth %>" height="<%= thumbheight %>"><%=thing.Name%></a></td> </tr> <% End If %> <% Next %> </table> <BR>
thumbwidth og thumpheight angiver bredde og højde på dit thumpnail.
folder angiver mappenavnet.
Jeg har også lavet en hvor man kan ændre hvor mange billeder som skal vises vandret. I ovenstående version er det jo kun et enkelt. Hvis du er interreseret i den anden version må du lige sige til.
hhmmmm jeg kan ikke få det til at virke.... uanset hvad jeg gør, viser den godt nok links med de rigtige navne, men billederne vil den ikke vise... der kommer bare røde kryds.... og jeg vil meget gerne have den som kan vise flere billeder i bredden
mit eneste forslag er at den bruger den fulde sti i billederne, måske den bare skulle være grafik/ ?
Synes godt om
Ny brugerNybegynder
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.