SELECT COUNT i db loop ??????
HejJeg er ved at lave et forum og skal derfor
have en forside med alle mine kategorier fra
min db. Dette foregår i asp og jeg bruger
en access db til dette formål .
Dog når jeg sætter COUNT ind i mit loop
så stopper det og viser kun den første poster
i min db. Hvordan kan det være ?
NB jeg henter katagorierne fra EN tabel og skal
tælle hvor mange gange de enkelte katagorier
optræder i min ANDEN db ????
LINK:
http://iceb.ljnet.dk/flash/forum/se.asp
KODEN:
<html>
<head>
<title>Forum Oversigt</title>
</head>
<body bgcolor="#999966" text="#000000" link="#000000" vlink="#000000" alink="#FFFFFF"
topmargin="2" leftmargin="0" marginwidth="0" marginheight="2">
<div align="left">
<table border="0" width="600" cellspacing="1" cellpadding="0" bgcolor="#CCCC99">
<tr>
<td valign="top" width="608"><table border="0" width="101%" cellspacing="1"
cellpadding="0">
<tr>
<td width="55%" bgcolor="#000000"><strong><font face="Verdana" size="2" color="#CCCC99">Forums</font></strong></td>
<td width="16%" bgcolor="#000000"><strong><font face="Verdana" size="2" color="#CCCC99">Antal
indlæg</font></strong></td>
<td width="26%" bgcolor="#000000"><strong><font face="Verdana" size="2" color="#CCCC99">Seneste
indlæg</font></strong></td>
</tr>
<%=strHTML%>
</table>
</td>
</tr>
</table>
</center></div>
</body>
</html>
<br><br>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("hp.mdb")
Conn.Open DSN
strSQL = "SELECT * FROM forumkategori,forum"
Set rs = Conn.Execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
Do
response.write "<a href=""emner.asp"" target=""_blank""><h3>--------"& rs("kategori")&"</h3></a>"
response.write "--------"& rs("beskrivelse")&"<br>"
Set rs = Conn.Execute ("SELECT COUNT(*) AS Antal FROM forum WHERE kategori='heilpraktikken'")
response.write rs("Antal")
rs.MoveNext
Loop While Not rs.EOF
end if
Conn.Close
Set Conn = Nothing
%>
