---
title: "räkna ihop antal mål."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/75191-räkna-ihop-antal-mål"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "asp"
published: "2003-04-27T15:45:55.000Z"
updated: "2003-04-27T19:34:02.000Z"
replies: 37
views: 722
page: 1
pages: 2
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/75191-räkna-ihop-antal-mål"
---

# räkna ihop antal mål.

_Sida 1 av 2._

## #1 — asp, 2003-04-27T15:45Z

Jag har en databas där jag sparar antal gjorda mål för mitt lag. Hur gör jag för att räkna ihop alla mål från alla rader?

Hoppas ni förstår..

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

## #2 — K@llen, 2003-04-27T15:48Z

```
sql ="select sum(goal) from table"
set rs = connect.execute(sql)

response.write rs(0)
```

Under förutsättning att fältet heter goal och är av typen integer.

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

## #3 — K@llen, 2003-04-27T15:51Z

Du kanske ville ha från ett och samma lag?

```
sql ="select sum(goal) from table where lagId = " & lagId
set rs = connect.execute(sql)

response.write rs(0)
```

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

## #4 — asp, 2003-04-27T15:55Z

Fältet heter "Gjorda" och är av typen "Tal". var skall jag lägga in den koden du gav mig för att inte störa den den andra SQL satsen.

```
<%

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("db/amica.mdb")
Set Rs = Conn.Execute("SELECT * FROM Post ORDER BY DATUM DESC")

Do Until Rs.EOF

%>

<tr>
<td width="80"><%=rs("datum")%></td>
<td width="250">
<% if lcase(rs("spelplats")) = "hemma" then
response.write "Amica Wronki - "& rs("motstandare")
else
response.write rs("motstandare") &" - Amica Wronki "
end if %> 
</td>
<td width="60" style="text-align: center">
<% if lcase(rs("spelplats")) = "hemma" then %>
<%= rs("gjorda") %> - <%= rs("inslappta") %>
<% else %>
<%= rs("inslappta") %> - <%= rs("gjorda") %>
<% end if %>
</td>
<td width="20" style="text-align: center"><img src="<%= rs("typ") %>.gif" width="6" height="6"
title="<%
if rs("typ") = "serie" then
response.write"Seriematch"
elseif rs("typ") ="cup" then
response.write"Cupmatch"
elseif rs("typ") = "traning" then
response.write"Träningsmatch"
elseif rs("typ") = "kompis" then
response.write"Kompisligamatch"
elseif rs("typ") = "utmaning" then
response.write"Utmaning"
end if
%>"></td>
</tr>

<%

Rs.Movenext
Loop
Rs.Close : Set Rs = Nothing
Conn.Close : Set Conn = Nothing

%>
```

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

## #5 — K@llen, 2003-04-27T15:57Z

Ligger fältet "Gjorda" i tabellen Post och var ska den presenteras?

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

## #6 — asp, 2003-04-27T16:01Z

Fältet "Gjorda" ligger i tabellen Post och där finns antal mål för mitt lag. Jag vill bara räkna ut gjorda mål för mitt lag, alltså addera alla tal från alla rader som liger under "Gjorda".

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

## #7 — K@llen, 2003-04-27T16:08Z

Och hur kännetecknar du lagen, har de ett numeriskt id och vad heter i så fall det fältet, och hur tar du emot det id:et som du vill hämta ut?

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

## #8 — asp, 2003-04-27T16:10Z

Det är bara ett lag, endast statistik för mitt lag. Alltså det ända jag vill är att addera värdet från fältet Gjorda.

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

## #9 — K@llen, 2003-04-27T16:15Z

Du kan skriva ut goalSum där du vill ha det. :)

```
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("db/amica.mdb")
Set Rs = Conn.Execute("SELECT * FROM Post ORDER BY DATUM DESC")

sql ="select sum(Gjorda) from Post"
set objRS = Conn.execute(sql)

goalSum = objRS(0)

Do Until Rs.EOF

...
...
```

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

## #10 — asp, 2003-04-27T16:22Z

Skall jag skriva ut det som \<%= rs("goalSum") %\> ??

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

## #11 — K@llen, 2003-04-27T16:26Z

> **asp skrev:**
>
> Skall jag skriva ut det som \<%= rs("goalSum") %\> ??

Näää, \<%= objRS("goalSum") %\>

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

## #12 — asp, 2003-04-27T16:29Z

Den vill inte. Får bara felmeddelande. Du, kan jag skriva \<%= objRS("goalSum") %\> var jag vill på sidan? innan SQl satsen??

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

## #13 — K@llen, 2003-04-27T16:30Z

Nej, du kan inte skriva ut värdet innan du hämtat det. ;)

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

## #14 — asp, 2003-04-27T16:32Z

men var som helst efter den?

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

## #15 — asp, 2003-04-27T16:33Z

ADODB.Recordset error '800a0cc1' 

Item cannot be found in the collection corresponding to the requested name or ordinal. 

/markuz88/resultat.asp, line 118 

får jag..

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

## #16 — K@llen, 2003-04-27T16:34Z

Var som helst efter raden:

goalSum = objRS(0)

och innan 

objRS.close()

men undvik skriva ut det inne i loopen, för då lär du få ut värdet flera gånger.

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

## #17 — K@llen, 2003-04-27T16:38Z

Eftersom jag skapade en egen variabel med värdet ska du skriva enligt nedan. En liten miss från mig. :e 

\<%= goalSum %\>

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

## #18 — asp, 2003-04-27T16:42Z

Jag får det inte att fungera. Det är nämligen så att jag vill ha "Gjorda mål" innan SQL satsen och det går ju inte. Kan inte du hjälpa mig att sätta in koden rätt.

```
<html>

<body>

<table width="410" cellpadding="1" cellspacing="0">
<tr>
<td width="150">Spelade matcher</td>
<td width="10"><b>1</td>
<td width="90"></td>
<td width="150">Gjorda mål</td>
<td width="10"><b><%= goalSum %></td>
</tr>
<tr>
<td width="150">Vinster</td>
<td width="10"><b>1</td>
<td width="90"></td>
<td width="150">Insläptta mål</td>
<td width="10"><b>2</td>
</tr>
<tr>
<td width="150">Oavgjorda</td>
<td width="10"><b>1</td>
<td width="90"></td>
<td width="150">Gjorda mål per match</td>
<td width="10"><b>3</td>
</tr>
<tr>
<td width="150">Förluster</td>
<td width="10"><b>1</td>
<td width="90"></td>
<td width="150">Insläptta mål per match</td>
<td width="10"><b>2</td>
</tr>
<tr>
<td width="100%" colspan="5"><hr style="height: 1; color: black"></td>
</tr>
</table>

<table width="410" cellpadding="1" cellspacing="0">
<tr>
<td width="80" style="font-weight: bold">Datum</td>
<td width="250" style="font-weight: bold">Lag</td>
<td width="60" style="font-weight: bold; text-align: center">Resultat</td>
<td width="20" style="font-weight: bold; text-align: center">Typ</td>
</tr>

<%

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("db/amica.mdb")
Set Rs = Conn.Execute("SELECT * FROM Post ORDER BY DATUM DESC")

sql ="select sum(Gjorda) from Post"
set objRS = Conn.execute(sql)

goalSum = objRS(0)

Do Until Rs.EOF

%>

<tr>
<td width="80"><%=rs("datum")%></td>
<td width="250">
<% if lcase(rs("spelplats")) = "hemma" then
response.write "Amica Wronki - "& rs("motstandare")
else
response.write rs("motstandare") &" - Amica Wronki "
end if %> 
</td>
<td width="60" style="text-align: center">
<% if lcase(rs("spelplats")) = "hemma" then %>
<%= rs("gjorda") %> - <%= rs("inslappta") %>
<% else %>
<%= rs("inslappta") %> - <%= rs("gjorda") %>
<% end if %>
</td>
<td width="20" style="text-align: center"><img src="<%= rs("typ") %>.gif" width="6" height="6"
title="<%
if rs("typ") = "serie" then
response.write"Seriematch"
elseif rs("typ") ="cup" then
response.write"Cupmatch"
elseif rs("typ") = "traning" then
response.write"Träningsmatch"
elseif rs("typ") = "kompis" then
response.write"Kompisligamatch"
elseif rs("typ") = "utmaning" then
response.write"Utmaning"
end if
%>"></td>
</tr>

<%

Rs.Movenext
Loop
Rs.Close : Set Rs = Nothing
Conn.Close : Set Conn = Nothing

%>

</table>

</body>
</html>
```

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

## #19 — K@llen, 2003-04-27T16:46Z

```
<html>

<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("db/amica.mdb")

sql ="select sum(Gjorda) from Post"
set objRS = Conn.execute(sql)

goalSum = objRS(0)

%>

<table width="410" cellpadding="1" cellspacing="0">
<tr>
<td width="150">Spelade matcher</td>
<td width="10"><b>1</td>
<td width="90"></td>
<td width="150">Gjorda mål</td>
<td width="10"><b><%= goalSum %></td>
</tr>
<tr>
<td width="150">Vinster</td>
<td width="10"><b>1</td>
<td width="90"></td>
<td width="150">Insläptta mål</td>
<td width="10"><b>2</td>
</tr>
<tr>
<td width="150">Oavgjorda</td>
<td width="10"><b>1</td>
<td width="90"></td>
<td width="150">Gjorda mål per match</td>
<td width="10"><b>3</td>
</tr>
<tr>
<td width="150">Förluster</td>
<td width="10"><b>1</td>
<td width="90"></td>
<td width="150">Insläptta mål per match</td>
<td width="10"><b>2</td>
</tr>
<tr>
<td width="100%" colspan="5"><hr style="height: 1; color: black"></td>
</tr>
</table>

<table width="410" cellpadding="1" cellspacing="0">
<tr>
<td width="80" style="font-weight: bold">Datum</td>
<td width="250" style="font-weight: bold">Lag</td>
<td width="60" style="font-weight: bold; text-align: center">Resultat</td>
<td width="20" style="font-weight: bold; text-align: center">Typ</td>
</tr>

<%

Set Rs = Conn.Execute("SELECT * FROM Post ORDER BY DATUM DESC")

Do Until Rs.EOF

%>

<tr>
<td width="80"><%=rs("datum")%></td>
<td width="250">
<% if lcase(rs("spelplats")) = "hemma" then
response.write "Amica Wronki - "& rs("motstandare")
else
response.write rs("motstandare") &" - Amica Wronki "
end if %> 
</td>
<td width="60" style="text-align: center">
<% if lcase(rs("spelplats")) = "hemma" then %>
<%= rs("gjorda") %> - <%= rs("inslappta") %>
<% else %>
<%= rs("inslappta") %> - <%= rs("gjorda") %>
<% end if %>
</td>
<td width="20" style="text-align: center"><img src="<%= rs("typ") %>.gif" width="6" height="6"
title="<%
if rs("typ") = "serie" then
response.write"Seriematch"
elseif rs("typ") ="cup" then
response.write"Cupmatch"
elseif rs("typ") = "traning" then
response.write"Träningsmatch"
elseif rs("typ") = "kompis" then
response.write"Kompisligamatch"
elseif rs("typ") = "utmaning" then
response.write"Utmaning"
end if
%>"></td>
</tr>

<%

Rs.Movenext
Loop
Rs.Close : Set Rs = Nothing
Conn.Close : Set Conn = Nothing

%>

</table>

</body>
</html>
```

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

## #20 — asp, 2003-04-27T16:49Z

Det fungerar. Du är så himla snäll som hjälper till. Jag kan behöve ytterliggare lite hjlälp. Orkar du? Om du inte gör det så tackar jag för all tid du har hjälpt mig.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/75191-räkna-ihop-antal-mål  
Nästa sida: https://www.webforum.nu/amne/asp/75191-räkna-ihop-antal-mål/page2.md
