---
title: "Om inlägg är..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/60022-om-inlägg-är"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Asa"
published: "2002-11-23T19:13:58.000Z"
updated: "2002-11-23T20:24:51.000Z"
replies: 10
views: 272
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/60022-om-inlägg-är"
---

# Om inlägg är...

## #1 — Asa, 2002-11-23T19:13Z

Har denna kod men verkar ej funka! Ska när man postar inlägg räkna antal inläggoch sen om man har ex 50 inlägg så ska man inte kunna posta fler! Hur gör jag?

Helst ska inlägg som är nr 50 raderas när nytt inlägg postas!

Är säkert enkelt men jag får ej till det! :(

```
<%Set Antal=Conn.Execute("Select Count(*) As Antal From gastbok Where id=" & GbId)

If Antal("antal") = 50 Then                
       Response.Redirect "gastbok.asp?id=" & GbId
Else
       Spara til databasen.....
       Response.Redirect "gastbok.asp?id=" & GbId
End If%>
```

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

## #2 — LarsG, 2002-11-23T19:50Z

Deja vu

```
If cint(Antal("antal")) >= 50 Then
```

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

## #3 — Asa, 2002-11-23T19:53Z

Det gick iallafall å posta fler :(

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

## #4 — Eitraz, 2002-11-23T20:05Z

Skriv ut ditt antal en gång o kontrollera så den verkligen är över 50 eller om det är nåt fel på den ;)

\-Eitraz

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

## #5 — Asa, 2002-11-23T20:06Z

Ja det är det! Jag testa med å ändra till 5 å det går å posta fler iallafall!

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

## #6 — Asa, 2002-11-23T20:09Z

Exakt kod ser ut så här:

```
<%GbId    = Request.QueryString("id")
AnvId   = Session("mem_id")
Anvnamn = Session("anvnamn")
Inlagg  = Request.Form("inlagg")

Set Antal=Conn.Execute("Select Count(*) As Antal From gastbok Where id=" & GbId)

If cint(Antal("antal")) >= 5 Then 
  Response.Redirect "gastbok.asp?id=" & GbId
Else
  Conn.Execute("Update users Set poang=poang+0.1 Where id=" & Session("mem_id"))

  Conn.Execute("Insert Into gastbok(gbid,anvid,anvnamn,inlagg) Values(" & GbId & "," & AnvId & ",'" & Anvnamn & "','" & FixaTecken(Inlagg) & "')")
  Response.Redirect "gastbok.asp?id=" & GbId
End If%>
```

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

## #7 — Asa, 2002-11-23T20:13Z

Haha! Fel namn på där jag räknar! Skulle vara:

Set Antal=Conn.Execute("Select Count(\*) As Antal From gastbok Where gbid=" & GbId)

Tack för all hjälp!

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

## #8 — Asa, 2002-11-23T20:14Z

Men hur raderar man den gamlaste posten när man postar en ny?

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

## #9 — LarsG, 2002-11-23T20:21Z

Gammal är äldst

```
delete from gb as f
where postDate in (select min(postDate) from gb
   where gbid = f.gbid)
```

Frågan är inte riktigt standard men din dbms kanske godkänner den i alla fall.

Annars så går det att lösa med hjälp av en vy.

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

## #10 — Asa, 2002-11-23T20:23Z

Ska testa!

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

## #11 — Asa, 2002-11-23T20:24Z

Funkar superbra efter jag ändrat lite! Tackar LarsG :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/60022-om-inlägg-är