---
title: "DELETE"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/92443-delete"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Ivar"
published: "2003-12-11T17:35:25.000Z"
updated: "2003-12-11T19:08:38.000Z"
replies: 4
views: 270
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/92443-delete"
---

# DELETE

## #1 — Ivar, 2003-12-11T17:35Z

```
Hej!

Jag vill Delita äldre annonser en 60 dagar och bilden, men den koden funkar inte 
Kan Ni se vad felet är. 

Set RecSet = Server.CreateObject("ADODB.Recordset") 
SQL = "DELETE FROM items WHERE dateCreated < #" & dateAdd("d",-60,Date & "bilder/" & RecSet("filename")) & "#" 
RecSet.Open SQL, Connect,1,2

Feltyp:
ADODB.Recordset (0x800A0CC1)
Objektet kunde inte hittas i mängden med det begärda namnet eller numret.
/Ivar
```

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

## #2 — LarsG, 2003-12-11T17:45Z

För att ta bort posterna från databasen

```
SQL = "DELETE FROM items WHERE dateCreated < date() - 60"
connect.execute sql,,128
```

Vad menar du med  "och bilden"?

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

## #3 — Ivar, 2003-12-11T18:20Z

Ok så här jag vill ta bort också bilderna som är i mappen bilder.
Om jag tar bort bara posterna från databasen då blir det massa onödiga filer(bilder) kvar. 
/Ivar

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

## #4 — LarsG, 2003-12-11T18:38Z

Det var väl det jag anade.

```
set fso = server.createobject("scripting.filesystemobject") 
sql = "select filename from items where dateCreated < date() - 60"
set rs = connect.execute(sql)
while not rs.eof
    fso.DeleteFile rs("filename")
    rs.movenext
wend
rs.close
set rs = nothing
set fso = nothing
SQL = "DELETE FROM items WHERE dateCreated < date() - 60"
connect.execute sql,,128
```

Du kanske behöver lägga till någon path när du gör deletefile.

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

## #5 — Ivar, 2003-12-11T19:08Z

```
Tack LarsG   jag la till sökvägen till  mappen och vips funkar perfekt.

set fso = server.createobject("scripting.filesystemobject") 
sql = "select filename from items where dateCreated < date() - 60"
set rs = connect.execute(sql)
while not rs.eof
    fso.DeleteFile(Server.MapPath("bilder/" & rs("filename")))
    rs.movenext
wend
rs.close
set rs = nothing
set fso = nothing
SQL = "DELETE FROM items WHERE dateCreated < date() - 60"
connect.execute sql,,128
/Ivar
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/92443-delete