---
title: "Statistik men hur?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/82810-statistik-men-hur"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Ivar"
published: "2003-07-26T16:04:39.000Z"
updated: "2003-07-26T18:28:46.000Z"
replies: 10
views: 340
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/82810-statistik-men-hur"
---

# Statistik men hur?

## #1 — Ivar, 2003-07-26T16:04Z

Hej!

Jag skulle behöva liknande statistik som finns på <https://www.prylar.nu>
Men jag vett inte hur ska jag göra. I access databasen har jag en tabell (items)
och  kolumnen typ (köpes) som jag vill få fram statistik på
hoppas Ni förstår mig.

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

## #2 — Inferis, 2003-07-26T16:41Z

Vilken statistik är det du vill ha?

Presentera lite kod så är det ju lättare att hjälpa dig.

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

## #3 — Ivar, 2003-07-26T17:14Z

```
Set db = Server.CreateObject("ADODB.Connection")
db.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/annonser.mdb") & ";pwd=;"
 
SQL = "SELECT Count(*) From items "
Set rs = db.Execute(SQL)

 <%=RS.Fields(0) %> </font>annonser i databasen
Sen vett ej hur jag ska göra?
```

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

## #4 — Fredde Mannen, 2003-07-26T17:15Z

Använd en SQL fråga liknande denna.... för att få fram antalet köpes 

```
'
SELECT COUNT(*) as antal from tabell WHERE column='köpes'
```

Typ...

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

## #5 — Ivar, 2003-07-26T17:40Z

```
Set db = Server.CreateObject("ADODB.Connection")
db.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/annonser.mdb") & ";pwd=;"
 
SQL = "SELECT Count(*) From items "

Set rs = db.Execute(SQL)

        <%=RS.Fields(0) %> </font>annonser 
        <% Set db = Server.CreateObject("ADODB.Connection")
db.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/annonser.mdb") & ";pwd=;"
 

SQL = "SELECT COUNT(*) as antal from items WHERE typ='köpes'"

Set rs = db.Execute(SQL)
        | Köpes: <font color="#FF0000"><%=RS.Fields(0) %>

Nu funkar men ska man verkligen ha 2 Connection finns det enklare sett?
MVH /Ivar
```

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

## #6 — jboy_87, 2003-07-26T17:51Z

```
Set db = Server.CreateObject("ADODB.Connection")
db.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/annonser.mdb") & ";pwd=;"
 
SQL = "SELECT Count(*) From items "

Set rs = db.Execute(SQL)

        <%=RS.Fields(0) %> </font>annonser 
<%SQL = "SELECT COUNT(*) as antal from items WHERE typ='köpes'"

Set rs = db.Execute(SQL)
        | Köpes: <font color="#FF0000"><%=RS.Fields(0) %>
```

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

## #7 — Fredde Mannen, 2003-07-26T18:00Z

> **Ivar skrev:**
>
> ```
> Set db = Server.CreateObject("ADODB.Connection")
> db.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/annonser.mdb") & ";pwd=;"
>  
> SQL = "SELECT Count(*) From items "
> 
> 
> Set rs = db.Execute(SQL)
> 
>         <%=RS.Fields(0) %> </font>annonser 
>         <% Set db = Server.CreateObject("ADODB.Connection")
> db.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/annonser.mdb") & ";pwd=;"
>  
> 
> SQL = "SELECT COUNT(*) as antal from items WHERE typ='köpes'"
> 
> Set rs = db.Execute(SQL)
>         | Köpes: <font color="#FF0000"><%=RS.Fields(0) %>
> 
> Nu funkar men ska man verkligen ha 2 Connection finns det enklare sett?
> MVH /Ivar
> ```

Du kan göra så här:

```
        | Köpes: <font color="#FF0000"><%=rs("antal")%>
```

 om du använder dig av :

```
sql = "SELECT COUNT(*) as antal from items WHERE typ='köpes'"
set rs = db.execute(sql)
```

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

## #8 — Ivar, 2003-07-26T18:03Z

Bra funkar och en sista fråga  hur gör jag om i kolumnen TYP finns tomma fält och fält med köpes hur får jag fram antalet tomma fält som ska vara säljes?
MVH /Ivar

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

## #9 — Fredde Mannen, 2003-07-26T18:06Z

> **Ivar skrev:**
>
> Bra funkar och en sista fråga  hur gör jag om i kolumnen TYP finns tomma fält och fält med köpes hur får jag fram antalet tomma fält som ska vara säljes?
> MVH /Ivar

```
sql = "SELECT COUNT(*) as saljes from items WHERE typ=''"

set rs2 = db.execute(sql)

| Säljes: <%=rs2("saljes")%>
```

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

## #10 — Ivar, 2003-07-26T18:11Z

Tack snälla NI är best!

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

## #11 — Peeer, 2003-07-26T18:28Z

Istället för att exekvera en sql-sats för varje kategori du vill lista är det bättre (mer dynamiskt och servervänligt) att hämta ut all data med en enda sql-sats.

```
Set db = Server.CreateObject("ADODB.Connection")
db.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/annonser.mdb") & ";pwd=;"

SQL = "SELECT COUNT(*) as antal, case when typ = '' then 'Säljes' else typ end as kategori from items group by typ"
Set rs = db.Execute(SQL)
if rs.eof Then
  Response.write "Inga annonser funna!"
else
do until rs.eof
  Response.write rs("kategori") &" - "&rs("antal")&"<br>"
  rs.movenext
loop
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/82810-statistik-men-hur