---
title: "Radera inlägg = fel!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/99510-radera-inlägg-fel"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "webbSAJTEN"
published: "2004-03-15T08:17:49.000Z"
updated: "2004-03-15T08:44:05.000Z"
replies: 8
views: 283
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/99510-radera-inlägg-fel"
---

# Radera inlägg = fel!

## #1 — webbSAJTEN, 2004-03-15T08:17Z

På admin ligger koden:

```
  <%
Dim objConn, rs, SQL
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("databas_gastbok.mdb")
SQL="SELECT * FROM inlagg"
Set rs=objConn.execute(SQL)
Do until rs.EOF
%>
  <b>Namn:</b> <%=rs("namn")%><br>
  <b>Inl<pi>gg:</b> <%=rs("mess")%><br>
  <a href="gastbok_tabort.asp?id=<%=rs("id")%>">Ta bort</a><p>
  <%
rs.MoveNext
Loop
rs.Close : Set rs = nothing
objConn.Close : Set objConn = nothing 
%>
```

och på gastbok_tabort.asp ligger:

```
<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("databas_gastbok.mdb")
SQL="select * from inlagg "%>
<% Radera = "SELECT * FROM inlagg WHERE id = "&Request.QueryString("id") & " " 
%>
```

När jag ska ta bort ett inlägg så kommer jag bara till en vit sida, inga felmess eller nått..  Inget inlägg raderas heller.. Vad är det som är fel?

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

## #2 — @nders, 2004-03-15T08:19Z

Du kör ju bara en SELECT, med vars resultat du gör ingenting, så det är ganska givet att inget raderas och inget skrivs ut. 

SELECT hämtar, DELETE raderar.

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

## #3 — mrblonde, 2004-03-15T08:22Z

Glöm inte bort att verifiera att den som vill ta bort ett inlägg verkligen får det. Annars kan ju vem som helts skriva in länken i sin webbläsare och pilla med querystringen och radera inlägg hejvilt.

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

## #4 — webbSAJTEN, 2004-03-15T08:28Z

Jag ändrade så nu är det:

\<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Driver={Microsoft Access Driver (\*.mdb)}; DBQ=" & server.mappath ("databas_gastbok.mdb")
SQL="select \* from inlagg "%\>
\<% Radera = "DELETE \* FROM inlagg WHERE id = "&Request.QueryString("id") & " " 
%\>

Nu står det och laddar hela tiden, den går aldrig vidare och tar bort inlägget..

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

## #5 — @nders, 2004-03-15T08:38Z

Hur ser koden ut som ligger efter den koden du visar?

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

## #6 — webbSAJTEN, 2004-03-15T08:40Z

Det finns ingen mer kod.. Det där är det som ligger på gastbok_tabort.asp

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

## #7 — @nders, 2004-03-15T08:41Z

Du exekverar inte SQL-frågan.

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

## #8 — mrblonde, 2004-03-15T08:42Z

lägg till

```
objConn.execute(radera)
```

 så du exekverar koden.

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

## #9 — webbSAJTEN, 2004-03-15T08:44Z

Jag löste det...
Jag la in:

```
<%
Dim objConn, rs, SQL
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("databas_gastbok.mdb")
SQL="DELETE from inlagg where id=" & Request.Querystring("id")
objConn.Execute SQL,,128
objConn.Close
Set objConn=Nothing
%>
```

RED. Glöm inte \[kod\]-taggarna! //OveRRidE

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/99510-radera-inlägg-fel