Skriv antal, og produktets navn

Jeg har følgende sætninger

strSQL = \"SELECT * FROM komponenter ORDER BY id ASC\"
set rs = conn.execute(strSQL)
strSQLcount = \"SELECT COUNT(*) as antal FROM komponenter where (produkt = \'\"& rs(\"produkt\") &\"\')\"
set rscount = conn.execute(strSQLcount)

response.write rscount(\"antal\")

hvordan for jeg outputtet af hvad det er den har talt.

hvis jeg laver følgende loop

do until rs.eof
response.write conn.execute(\"SELECT COUNT(*) as antal FROM komponenter where (produkt = \'\"& rs(\"produkt\") &\"\')\")(\"antal\") &\"<br>\"
response.write rs(\"produkt\") &\"<br>\"
rs.movenext
loop

får jeg produktet skrevet f.eks. 3 gange hvis det står i databsen 3 gange. Altså

produkt1 (2)
produkt1 (2)
produkt2 (1)
produkt3 (3)
produkt3 (3)
produkt3 (3)

Jeg vil have den til at skrive

produkt1 (antal)
produkt2 (antal)
produkt3 (antal)