Såhär har jag gjort i ett forum för att kunna räkna upp
underkategorierna och samtidigt kunna räkna hur många svar
man fått på varje underkategori.
Set RS=Conn.Execute ("SELECT * FROM sSubCat WHERE sSubId='" & Request.QueryString("Id") & "' ORDER BY sSubDate DESC")
do while not rs.eof
Set RS2=Conn.Execute("SELECT COUNT(sAnswerIdCat) AS sCount FROM sAnswer WHERE sAnswerIdCat='" & sTest & "'")
'#---Skriva ut UnderKategori & Hur många svar...
RS.MoveNext
Loop
Jag är säker på att man kan skriva dessa SQL-satser mycket
bättre. Kan någon vänlig själ reda ut detta, så man lär sig.
sql = "select count(sAnswerId) as answer, sSubCat,sSubId , sSubCatTxt , sSubName ,sSubDate from sSubcat left join sAnswer on sSubcatid = sAnswerid where sSubid = '" & Request.QueryString("Id") & "' group by sSubCat,sSubId , sSubCatTxt , sSubName ,sSubDate Order by sSubdate desc "
set rs = conn.execute(sql)
while not rs.eof
'#---Skriva ut UnderKategori response.write "Antal svar " & rs("answer") & "<br>"
RS.MoveNext
wend
