---
title: "FSO - Om bild inte fins visa annan ?!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/41681-fso-om-bild-inte-fins-visa-annan"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ConnyFox"
published: "2002-04-15T19:22:27.000Z"
updated: "2002-04-17T13:36:15.000Z"
replies: 3
views: 231
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/41681-fso-om-bild-inte-fins-visa-annan"
---

# FSO - Om bild inte fins visa annan ?!

## #1 — ConnyFox, 2002-04-15T19:22Z

Jo jag ahr 3 stycken frågor.

Fråga 1 : Går det att göra så att ifall em bild inte existerar så visas en annan "default" bild? och isåfall hur gör man?

Fråga 2 : Ungefär som fråga1 fast om en bild är äldre än t.ex 5 min så visas en annan "default" bild..

Fråga 3 : Hur gör man för att lista alla inlägg utan dom 10 senaste ?

tack på förhand!

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

## #2 — PatrikB, 2002-04-15T21:59Z

Fråga 1:
Ja, bara att kolla om det sökta filnamnet finns med alla filer i en katalog finns

```
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("D:\folder\")
For Each File IN objFolder.Files
If File.Name = "minfil.txt" Then
'## -- gör något med filen, den finns --
Else
'## -- gör ngt annat för filen hittades inte --
End If
Next
Set objFolder = Nothing
Set objFSO = Nothing
```

Fråga 2:

```
If File.DateLastModified < DateAdd("n", -5, Now()") Then
'## -- filen äldre än 5 minuter --
Else
'## -- bilden är inte äldre än 5 minuter --
End If
```

Fråga 3:

```
strSQL = "SELECT Field, Field2 FROM Table WHERE Not Field IN(SELECT TOP 10 Field FROM Table)"
```

cya,
PatrikB

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

## #3 — ConnyFox, 2002-04-17T12:01Z

Hmm ok som ni kanske fattat e jag ingen gud på det här direkt.. =D fick ett par problem.. 

Nr.1

```
<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(Server.MapPath("bilder\"))
For Each File IN objFolder.Files
If File.Name = "minfil.txt" Then
response.write "kossa"
Else
response.write "kossa2"
End If
next
Set objFolder = Nothing
Set objFSO = Nothing
%>
```

Skrev ut kossa2 ungefär 50 ggr =D inte riktigt meningen.. antar det e nånting med next men den måste ju tydligen finnas där =/

Nr2

```
SQL = "SELECT * FROM nyheter WHERE Not rubrik IN(SELECT TOP 2 * FROM nyheter)"
```

Funka inte heller riktigt =/ den ville man skulle använda "exists eller nått..

Tack på förhand!

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

## #4 — solbulle, 2002-04-17T13:36Z

Kanske så här:

\<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(Server.MapPath("bilder\\"))
For Each File IN objFolder.Files
If File.Name = "minfil.txt" Then
kossa = "kossa"
End If
next
If Not kossa = "kossa" then
kossa = "kossa2"
End If
Set objFolder = Nothing
Set objFSO = Nothing
response.write kossa
%\>

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/41681-fso-om-bild-inte-fins-visa-annan