Tabell!

Hej!

Jag håller på att göra en tabell där man visar hemmastatistik. Koden nedan skriver ut all statistik på hemmaplan för laget med id 1 (lagid = 1).

Här kommer en dålig SQL sats som jag använder:

[red]strSQL = "SELECT COUNT(*) FROM tblSpel WHERE ligaid = " & intID
Set objRSH = Conn.Execute(strSQL)

strSQL = "SELECT COUNT(*) FROM tblSpel WHERE ligaid = " & intID & " AND hlag = 1 AND hmal IS NOT null"
Set objRSHM = Conn.Execute(strSQL)

strSQL = "SELECT COUNT(*) FROM tblSpel WHERE ligaid = " & intID & " AND hlag = 1 AND hmal > bmal"
Set objRSHV = Conn.Execute(strSQL)

strSQL = "SELECT COUNT(*) FROM tblSpel WHERE ligaid = " & intID & " AND hlag = 1 AND hmal = bmal"
Set objRSHO = Conn.Execute(strSQL)

strSQL = "SELECT COUNT(*) FROM tblSpel WHERE ligaid = " & intID & " AND hlag = 1 AND hmal < bmal"
Set objRSHF = Conn.Execute(strSQL)

strSQL = "SELECT Sum(hmal) FROM tblSpel WHERE ligaid = " & intID & " AND hlag = 1"
Set objRSHGJ = Conn.Execute(strSQL)

strSQL = "SELECT Sum(bmal) FROM tblSpel WHERE ligaid = " & intID & " AND hlag = 1"
Set objRSHIN = Conn.Execute(strSQL)[/red]

Och jag skriver ut med tabellen med:

[red]Do Until objRSH.EOF

   Response.Write("Amica Wronki.....")
   Response.Write objRSHM(0)
   Response.Write(" ")
   Response.Write objRSHV(0)
   Response.Write(" ")
   Response.Write objRSHO(0)
   Response.Write(" ")
   Response.Write objRSHF(0)
   Response.Write("  ")
   Response.Write objRSHGJ(0)
   Response.Write(" - ")
   Response.Write objRSHIN(0)
   Response.Write(" ")
   Response.Write FormatNumber(objRSHV(0)*3+objRSHO(0),0)

objRSH.Movenext
Loop[/red]

Nu är det såhär att jag vill skriva ut alla lag, och inte bara lag med lagid = 1.

Hoppas ni förstår, annars skriv vad ni inte förstår.

Byt ut första sql-satsen mot följande:

strSQL = "SELECT COUNT(*) FROM tblSpel"

Nej, du har missuppfattat mig. Det skall vara klart, den gör så att tabell.asp?id=2 visar tabellen för liga med id 2.

Men det är alla alla lag jag vill skriva ut i en serietabell.

[red]
strSQL = "SELECT Sum(bmal) FROM tblSpel WHERE ligaid = " & intID & " AND hlag = [blue]1[/blue]"
Set objRSHIN = Conn.Execute(strSQL)[/red]

/Blue skall bytas ut så att man kan visa alla. 1:an gör så att man bara visar statistik för lag med lagid 1.

Någon?

Vad vill du göra? Förklara mera.

Jag vill skriva ut en serietabell...