räkna vinster och förluster ...

skulle

<% WIN = "SELECT COUNT(*) AS wins FROM matcher where poang1 > poang2"
Set objRS = objCon.Execute(WIN)

Response.Write("Vi har vunnit " & objRS("wins") & " matcher.")
Set objRS = Nothing
%>
<% LOS = "SELECT COUNT(*) AS los FROM matcher where poang1 < poang2"
Set objRS = objCon.Execute(LOS)

Response.Write("Vi har förlorat " & objRS("los") & " matcher.")
Set objRS = Nothing
%>
<% OAV = "SELECT COUNT(*) AS oav FROM matcher where poang1 = poang2"
Set objRS = objCon.Execute(OAV)

Response.Write("Vi har spelat " & objRS("OAV") & "oavgjorda matcher.")
Set objRS = Nothing
%>

kunna funka ???

Testa?

https://www.swedepoint.com kolla.... de skriver fel .. det ska va 1 vunnen 1 förlorad och en oavgjord men den skriver 2 förlorade 1 oavgjord

Jag kan då inte se något fel i koden...

samma här

Är du heeelt säker på att talen i databasen är rätt? :OO

ja.. den visar ju grönt att en e vunnen .

<%
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("databas.mdb")

strSQL = "SELECT * FROM matcher"
Set objRS = objCon.Execute(strSQL)

Do Until objRS.EOF
  If CInt(objRS("poang1")) > CInt(objRS("poang2")) Then
    intWon = intWon + 1
  ElseIf CInt(objRS("poang1")) < CInt(objRS("poang2")) Then
    intLost = intLost + 1
  ElseIf CInt(objRS("poang1")) = CInt(objRS("poang2")) Then
    intLika = intLika + 1
  End If
  objRS.MoveNext
Loop

Set objRS = Nothing
Response.Write("Vi har vunnit " & intWon & " matcher.<br>")
Response.Write("Vi har förlorat " & intLost & " matcher.<br>")
Response.Write("Vi har spelat " & intLika & " oavgjorda matcher.<br>")
%>

Det kanske kan funka?