Count af flere tabeller

uhm, \"Select count(id) as Antal from tabel,tabel1,tabel2\" ??

ellers skal du måske have fat i noget inner join som ikke er min stærke side :(

Ja, det er nemt nok. Du laver lige så mange SQL-sætninger, som du har
tabeller. Nemt, elegant, og hurtigt - i hvert fald så hurtigt du kan gøre det :)

Ja til erikjacobsen, og :
Sql =\"Select count(id) as Antal from tabel\"
conn.execute (sql)

2 linier til hver tabel.  Antal1 from tabel1
                          Antal2 from tabel2

Får at undgå dette, kan du altid lave en tabel der kaldes \"tæller\", så hver gang du insætter i de andre tabeller, bruger du en ekstra SQL for at
Opdatere tallet i \"tæller\" eller counter.

det jeg bruger indtil videre er noget lignende dette:

dim totalcount
set rs = conn.execute(\"Select Count(\"id\") as recordcount from tabel1\")
totalcount=totalcount+rs(\"recordcount\")
set rs = conn.execute(\"Select Count(\"id\") as recordcount from tabel2\")
totalcount=totalcount+rs(\"recordcount\")

Er det ikke noget lignende det samme i foreslår? Er der ikke en mere smart måde at klare det på?

Jeg havde lige en ledig stund og lavede disse to funktioner som tager alle \"menneskeskabte\" tabeller fra en database og tæller ID:

<%
Function  ListTables
Dim objConn, objRS, Antal
Antal = 0
Set objConn = Server.CreateObject(\"ADODB.Connection\")
objConn.ConnectionString = \"xxxxxxxxxxxxxxxxxxxxxxxxxxx\"
objConn.Open strConn
Set objRS = objConn.OpenSchema(20)
Do while Not objRS.EOF
If objRS(\"TABLE_TYPE\") = \"TABLE\" Then
Antal = Antal + GetCount(objRS(\"TABLE_NAME\"),objConn)
End if
objRS.MoveNext
Loop
ListTables = Antal
objRS.Close
objConn.Close
Set objRS = Nothing
Set objConn = Nothing
End Function


Function GetCount(tbl,connection)
Dim  objRS, sql
Set objRS = connection.Execute(\"SELECT Count(Id) FROM [\" & tbl & \"]\")
GetCount = objRS(0)
objRS.Close
Set objRS = Nothing
End function

Response.write ListTables
%>