---
title: "Loopa upp bilder"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/53160-loopa-upp-bilder"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Ceeron"
published: "2002-09-13T18:54:12.000Z"
updated: "2002-09-13T21:29:27.000Z"
replies: 7
views: 236
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/53160-loopa-upp-bilder"
---

# Loopa upp bilder

## #1 — Ceeron, 2002-09-13T18:54Z

Undrar lite...
Kan man loopa upp alla bilder man har i en mapp på en sida?
Skulle vilja loopa upp en hel mapp o ha 2st på varje rad...

Nån kanske fattar va jag menar ;)

Permalänk: https://www.webforum.nu/p/53160

## #2 — CatZ, 2002-09-13T18:57Z

det va inget.. orkar inte....

Permalänk: https://www.webforum.nu/p/785376

## #3 — alj, 2002-09-13T20:59Z

```
<% 

Dim sPath, lPath, objFS, fld, fls, count 

sPath = "filer" 
lPath = Server.MapPath(sPath) 

Set objFS = CreateObject("Scripting.FileSystemObject") 
Set fld = objFS.GetFolder(lPath) 
Set fls = fld.Files 

On error resume next 
For each File in fls 
%> 
<a href="<%=sPath%>/<%=File.Name%>" target="_blank"><%=File.Name%></a> &nbsp;<br>
 
<% 
Next 
Set fld = Nothing 
Set objFS = Nothing 
%>
```

Ett skript jag använder.. fungerar jätte bra.

Permalänk: https://www.webforum.nu/p/785473

## #4 — solbulle, 2002-09-13T21:10Z

> det va inget.. orkar inte....

Jag orkar.... nästan. ;)

<http://www.webforum.nu/search.php?s=&action=showresults&searchid=97257&sortby=lastpost&sortorder=descending>

RED. Åfan, man kanske skulle uppdatera sina fönster emellanåt... jaja.

Permalänk: https://www.webforum.nu/p/785479

## #5 — alj, 2002-09-13T21:12Z

> **solbulle skrev:**
>
> RED. Åfan, man kanske skulle uppdatera sina fönster emellanåt... jaja.

Varför då, när redigerningsknappen finns ;D

Permalänk: https://www.webforum.nu/p/785481

## #6 — solbulle, 2002-09-13T21:19Z

Jag syftade på att min länk kom lite sent, det jag kan tänka mig var att Catz var inne på att detta har tagits upp ett antal gångetr och går lätt att hitta om man söker.

Bra script iofs, fast jag hade nog lagt in en response.write, typ:

```
<% 
Dim sPath, lPath, objFS, fld, fls, count 

sPath = "filer" 
lPath = Server.MapPath(sPath) 

Set objFS = CreateObject("Scripting.FileSystemObject") 
Set fld = objFS.GetFolder(lPath) 
Set fls = fld.Files 

For each File in fls 

response.write "<a href=""" & sPath & "/" & File.Name & """ target=""_blank"">" & File.Name & "</a><br>"

Next 
Set fld = Nothing 
Set objFS = Nothing 
%>
```

Permalänk: https://www.webforum.nu/p/785487

## #7 — solbulle, 2002-09-13T21:29Z

Fast när jag läser frågan lite bättre ser jag att det var bilderna han ville visa, kanske detta kan vara något: (vägrar redigera! :) )

```
<% 
Dim sPath, lPath, objFS, fld, fls, count 

sPath = "filer" 
lPath = Server.MapPath(sPath) 

Set objFS = CreateObject("Scripting.FileSystemObject") 
Set fld = objFS.GetFolder(lPath) 
Set fls = fld.Files 

i=1
For each File in fls 

response.write "<img src=""" & sPath & "/" & File.Name & """>"

if i mod 2=0 then Response.Write "<br>"
i=i+1
Next

Set fld = Nothing 
Set objFS = Nothing 
%>
```

Permalänk: https://www.webforum.nu/p/785492

## #8 — alj, 2002-09-13T21:29Z

Jo det är nog smidigare..
Men ni ska inte tro jag gjort scriptet så ingen ära till mig :p
Hittade det på w3schools tror jag..

Permalänk: https://www.webforum.nu/p/785494

---

Tråden på webben: https://www.webforum.nu/amne/asp/53160-loopa-upp-bilder