Någon här som förstår sig på koden?
Jag vill loopa alla svar till debatterna under respektive debatt-rubrik.
Men den visar bara den översta svars-rubriken under varje debatt-rubrik.
Nån som hängde med?
Tacksam för hjälp!
<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT (select count(*) from debatt) As AntalDebatt, *, Format$([datum],'yyyy/mm/dd') AS formdatum FROM debatt order by DID desc"
RecSet.Open SQL, Connection, adOpenStatic, adLockOptimistic
Set Number = Connection.Execute("Select Count(*) As Antal FROM debatt_svar")
response.write recset("AntalDebatt") & "<br>"
while not recset.eof
Set RecSet2 = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT (select count(*) from debatt_svar) As AntalSvar, *, Format$([datum],'yyyy/mm/dd') AS formdatum FROM debatt_svar WHERE SID = " & recset("DID") & " order by datum desc"
RecSet2.Open SQL, Connection, adOpenStatic, adLockOptimistic
response.write ("<a href=""visa_debatt.asp?DID=" & recset("DID") & "&""SID=" & recset2("SID") & """>" & Recset("rubrik") & "</a>")
response.write "Antal svar: " & recset2("AntalSvar") & "<br>"
while not recset2.eof
response.write recset2("rubrik") & "<br><br>"
recset2.movenext
wend
set recset2 = nothing
recset.movenext
wend
set recset = nothing
%>