---
title: "Få ihop två COUNT?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/databaser-sql/109137-få-ihop-två-count"
topic: "Databaser & SQL"
topic_url: "https://www.webforum.nu/amne/databaser-sql"
author: "Bosse168"
published: "2004-08-13T15:31:55.000Z"
updated: "2004-08-14T11:27:40.000Z"
replies: 7
views: 296
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/databaser-sql/109137-få-ihop-två-count"
---

# Få ihop två COUNT?

## #1 — Bosse168, 2004-08-13T15:31Z

Kan man på något smidigt sätt slå ihop dessa två counts och blir det snällare för servern?

```
Set Rs = Connect.Execute("SELECT COUNT(messageid) from mailin WHERE last=0 AND till='" & username & "'")
If not Rs.EOF Then
nytt=Rs(0)
End If
Rs.Close : Set Rs = Nothing

Set Rs = Connect.Execute("SELECT COUNT(ID) FROM gb WHERE  last=0 AND till='" & username & "'")
If not Rs.EOF Then
nytt = nytt + Rs(0)
End If
Rs.Close : Set Rs = Nothing
```

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

## #2 — Engine^, 2004-08-13T16:29Z

```
strSql = "SELECT Count(*), (SELECT COUNT(*) FROM gb WHERE last = 0 AND till = '" & username & "') " & _
         "FROM mailin " & _
         "WHERE last = 0 AND till = '" & username & "'"

Set Rs = Connect.Execute(strSql)

nytt = CLng(Rs(0)) + CLng(Rs(1))

Rs.Close : Set Rs = Nothing
```

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

## #3 — Bosse168, 2004-08-13T16:58Z

Kan man få in denna också?

```
Set Rs = Connect.Execute("SELECT COUNT(username) FROM members Where status = 'online'")

online=Rs(0)

Rs.Close : Set Rs = Nothing
```

Obs annan variabel.

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

## #4 — Bosse168, 2004-08-13T16:59Z

Märkte också att jag får detta fel mess när jag använder den SQL satsen.

Microsoft OLE DB Provider for ODBC Drivers error '80040e14' 

\[MySQL\]\[ODBC 3.51 Driver\]\[mysqld-4.0.20a-nt\]You have an error in your SQL syntax. Check the manual that corresponds to your MySQL server version for the right syntax to use near 'SELECT COUNT(\*) FROM gb WHERE last = 0 AND till = 'bosse') FR

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

## #5 — Bosse168, 2004-08-14T00:25Z

Ingen?

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

## #6 — Engine^, 2004-08-14T10:34Z

Du kan inte använda subselects i MySQL om du inte har version 4.1 och uppåt.

Du får helt enkelt köra tre frågor eller uppgradera. ;)

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

## #7 — Bosse168, 2004-08-14T10:58Z

Version 4.1 är ju bara beta.
Funkar tidigare SQL satser i 4.1?

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

## #8 — Bosse168, 2004-08-14T11:27Z

får detta felmeddelande när jag har uppgraderat till 4.1

Microsoft VBScript runtime error '800a000d' 

Type mismatch 

/logga_in.asp, line 104 

```
strSQL="select count(*),min(datum) from inloggningar where slaf='"& killChars(secure(vem)) &"' LIMIT 1"
Set rstLogins=Connect.Execute(strSQL)
lngLogs=rstLogins(0)
datFirst=rstLogins(1)
rstLogins.Close : Set rstLogins=Nothing

If lngLogs<=15 Then '----------- rad 104
    strSQL="insert into inloggningar(memb, datum, status, ip) values ('"& secure(vem) &"',NOW(),'1','"& Request.ServerVariables("REMOTE_ADDR") &"')"
Else
    strSQL="UPDATE inloggningar set datum=Now(),status='1',ip='"& Request.ServerVariables("REMOTE_ADDR") &"' where memb='"& secure(vem) &"' and datum='" & datFirst & "' LIMIT 1"
End If
Connect.Execute strSQL,,128
```

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

---

Tråden på webben: https://www.webforum.nu/amne/databaser-sql/109137-få-ihop-två-count