2 SQL-statements?
Følgende kode trækker debatemner i den rækkefølge de bliver postet:<table border="0" width="100%" cellpadding="6" cellspacing="0">
<tr>
<td>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
dbConn = "SERVER=Local;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/fpdb/include.mdb")
Conn.open dbConn
SQL = "SELECT TOP 25 * FROM debat WHERE post_parent = 0 ORDER BY emneID DESC"
Set RS = Conn.Execute( SQL )
response.write "<tr><td valign=""top"" width=""50%""><span class=""tekst11""><b>" & "Emne" & "</b></span></td>"
response.write "<td valign=""top"" width=""10%""><span class=""tekst11""><b><p align=""center"">" & "Bsv" & "</p></b></span></td>"
response.write "<td valign=""top"" width=""20%""><span class=""tekst11""><b>" & "Oprettet" & "</b></span></td>"
response.write "<td valign=""top"" width=""20%""><span class=""tekst11""><b>" & "Besvaret" & "</b></span></td></tr>"
%>
<tr>
<td colspan="4">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr><td height="1" bgcolor="AF0000"><img src="/images/1x1.gif"></td></tr>
</table>
</td>
</tr>
<%
while NOT RS.EOF
tidspunkt = addZ(day(RS("tid"))) & "-" & addZ(month(RS("tid"))) & "-" & year(RS("tid")) & " " & addZ(hour(RS("tid"))) & ":" & addZ(minute(RS("tid")))
response.write "<tr><td valign=""top"" width=""50%""><span class=""tekst11""><a href=""debatemne.asp?emneID=" & RS("emneID") & """>" & RS("emne") & "</a></span></td>"
response.write "<td valign=""top"" width=""10%""><span class=""tekst11""><p align=""center"">" & "1" & "</p></span></td>"
response.write "<td valign=""top"" width=""20%""><span class=""tekst11""><nobr>" & tidspunkt & "</nobr></span></td>"
response.write "<td valign=""top"" width=""20%""><span class=""tekst11""><nobr>" & tidspunkt & "</nobr></span></td></tr>"
RS.MoveNext
text=""
wend
%>
<tr>
<td colspan="4">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr><td height="1" bgcolor="AF0000"><img src="/images/1x1.gif"></td></tr>
</table>
</td>
</tr>
<%
RS.Close
Set RS = nothing
Conn.Close
Set Conn = nothing
%>
</td>
</tr>
</table>
Nu vil jeg gerne have vist antallet af de besvarelser der er på et givent debatemne, og jeg vil tro, at det skal gøres med noget i denne stil:
SQL = "SELECT COUNT(*) AS antal FROM debat WHERE post_parent = 'emneID' "
HJÆLP :o)
