Problem med rs.eof

Hej gott folk...
Jag kan inte klura ut hur jag ska bära mig åt att loopa mer än en Record set.
Med denna kod hamnar bara flera DID som är samma efter varann, och under dessa var och en SID.
Jag vill alltså bara ha en av varje DID som har tillhörande SID under sig.
Någon som förstår? :)

				               <% 
RecSet2.pagesize = 10 
sida = Request.QueryString("sida") 

If sida = "" then sida = 1 

if RecSet2.EOF then 
Response.write "Det finns inga poster att hämta i databasen" 
Else 

RecSet2.AbsolutePage = sida 
totalPages = RecSet2.PageCount 

Do until RecSet2.EOF or fldcounter = RecSet2.pagesize 
fldcounter = fldcounter + 1 
%>
				   
				  
                    <a href="visa_debatt.asp?DID=<%=RecSet("DID")%>"><font size="2"><%=RecSet("rubrik")%></font></a> 
					<br> 
					
                    &nbsp;- <a href="visa_svar.asp?ID=<%=RecSet2("ID")%>&DID=<%=RecSet("DID")%>"><%=RecSet2("rubrik")%></a>
					 <%=RecSet2("namn")%>
					</font></p>
					                 <% 
RecSet2.MoveNext
Loop
End If %>

Du måste visa koden för dina SQL-satser ifall jag skall kunna hjälpa dig med detta. Annars är väl detta den generella metoden om man inte gör en jätte-JOIN och sedan sorterar datat med lite sträng/long-jämförelser på ASP-sidan.

while not rs.eof 

   response.write rs("Element") & "<br>"

   sql = "SELECT * FROM SubElement WHERE ElementId = " & rs("ELementId") & ""
   set rs2 = conn.execute(sql)
   while not rs.eof 
      response.write rs2("SubElement") & "<br>"
      rs2.movenext
   wend
   set rs2 = nothing

   rs.movenext
wend

Kanske blev det lite luddigt, det jag vill är följande.
Jag vill ha de olika rubrikerna, från debatt-tabellen, loopade.
Och under dessa debattrubriker, tillhörande respektive under-rubriker. Är du med?

Här är SQL-satserna, som jag också tvivlar på skall se ut så här.

 Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT *, 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")

Set RecSet2 = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT *, Format$([datum],'yyyy/mm/dd') AS formdatum FROM debatt_svar order by datum desc"
RecSet2.Open SQL, Connection, adOpenStatic, adLockOptimistic

Set Number = Connection.Execute("Select Count(*) As Antal FROM debatt_svar")

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 

   response.write recset("Element") & "<br>"

   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 debatt_id = " & recset("id") & " order by datum desc"
   RecSet2.Open SQL, Connection, adOpenStatic, adLockOptimistic
   response.write "Antal svar: " & recset2("AntalSvar") & "<br>"
   while not recset2.eof 
      response.write recset2("Din_kolumn") & "<br>"
      recset2.movenext
   wend
   set recset2 = nothing

   recset.movenext
wend

set recset = nothing

TACK!

Eftersom det är första gången jag gör något med relationer, så uppskattas hjälp väldigt mkt.

Men, denna del blir inte bra.

    SQL = "SELECT (select count(*) from debatt_svar) As AntalSvar, *, Format$([datum],'yyyy/mm/dd') AS formdatum FROM debatt_svar WHERE debatt_id = " & recset("id") & " order by datum desc"

Vad skall stå vid "WHERE debatt_id och recset("id")
Jag skrev SID och DID för att få det att överhuvud fungera. De relaterade är DID från debatt och SID från debatt_svar, där också ID ligger för att räkna dem.
Men märkte dock att det inte blev rätt, då alla debatt-rubriker hade lika många debattsvar-rubriker.

Sen var tanken att länka dessa debatt-rubriker, till själva debatten, likaså med debatt-svaren. Hur länkar jag i response.write?

Och till sist så ska jag lyckas lägga till svaren i rätt debatt, svarsidan hamnar på rätt debatt-id. men när det läggs in, hamnar det lite som det vill..

Nu blev det mkt, men som sagt, hjälp uppskattas!

Ingen som kan hjälpa till?
Uppskattar verkligen hjälp, då det är lite brådskande...