---
title: "Hämta bilder från FTP!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/92931-hämta-bilder-från-ftp"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "asp"
published: "2003-12-17T18:31:46.000Z"
updated: "2003-12-26T12:07:29.000Z"
replies: 11
views: 443
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/92931-hämta-bilder-från-ftp"
---

# Hämta bilder från FTP!

## #1 — asp, 2003-12-17T18:31Z

Om jag har massa bilder i mappen bilder, hur gör jag för att lista ut deras namn?

Kort sagt: Jag vill lista ut alla namn i mappen bilder.

Liksom.

```
Do untill...
  Response.Write("<p align=center><img src=" & bildensnamn & "></p>")
Loop
```

Förstår ni?

Jag behöver inte skapa några thumbs eller något...

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

## #2 — Mog, 2003-12-17T19:53Z

Detta kanske !

```
<%
Response.Write(ReadDir(Server.MapPath("/bilder")))

Function ReadDir(FolderName)
  Dim objFSO
  Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

  ''Kontrollera att mappen finns
  If Not objFSO.FolderExists(FolderName) Then
    ReadDir = "Mappen <B>" & FolderName & "</B> finns inte !"
    Exit Function
  End If

  ''Skapa objekt för aktuell mapp
  Dim objFolder
  Set objFolder = objFSO.GetFolder(FolderName)
  Dim objFile

 ''Loopa igenom alla filer i mappen
  For Each objFile In objFolder.Files
    Response.Write(objFile.Path & "<BR>")
  Next

  Set objFolder = Nothing
  Set objFile = Nothing
  Set objFSO = Nothing

End Function
%>
```

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

## #3 — asp, 2003-12-21T10:36Z

Fungerar galant! Tack!

Men hur gör jag om jag bara vill lista ut bilder?

If objFile = "" Then
  Response.Write(objFile)
End if

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

## #4 — Mog, 2003-12-21T11:54Z

Så här kanske;

```
If (Right(objFile.Path, 4) = ".jpg" OR Right(objFile.Path, 4) = ".gif") Then
  Response.Write(objFile.Path & "<BR>")
End If
```

Det finns mer att läsa i [denna tråden](http://www.webforum.nu/showthread.php?s=&threadid=90921).

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

## #5 — asp, 2003-12-21T21:55Z

Jo, jag tänkte på det med, aja, det får bli så...

men .jpeg, .bmp... men jag använder ändå aldrig det..

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

## #6 — Mog, 2003-12-21T22:32Z

För övrigt, har du nåt annat än bilder i den mappen ?

> **asp skrev:**
>
> Om jag har massa bilder i mappen bilder, hur gör jag för att lista ut deras namn?
> 
> Kort sagt: Jag vill lista ut alla namn i mappen bilder.

I så fall kan du vända på if-satsen, lista allt UTOM .txt, .htm eller vad det kan vara.

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

## #7 — asp, 2003-12-21T23:00Z

ja, men går det inte med typ...

if filnamn = picture then...

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

## #8 — Mog, 2003-12-21T23:06Z

> **asp skrev:**
>
> ja, men går det inte med typ...
> 
> if filnamn = picture then...

Nu förstår jag inte vad du menar :q

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

## #9 — asp, 2003-12-22T07:07Z

Går det inte att kontrollera om filen är en bild genom liknande.?

If objFile.Path = Image Then
'weeeeee
End if

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

## #10 — Mog, 2003-12-22T12:26Z

Det är utanför mina kunskaper, misstänker dock att det blir minst lika omständigt som att kolla filändelserna en och en.

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

## #11 — @nders, 2003-12-22T12:36Z

Det går säkert att göra med någon Image-komponent, men det låter som att gå över ån efter vatten, tappa smöret och sätta eld på björnskinnet när man ändå håller på.

Håll dig till det som är enkelt, jag tror man förlorar mer än man vinner på att göra det mer komplicerat.

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

## #12 — asp, 2003-12-26T12:07Z

okk..

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/92931-hämta-bilder-från-ftp