Avatar billede intrique Nybegynder
24. oktober 2002 - 18:01 Der er 14 kommentarer og
1 løsning

Count af Kommentarer

Jeg har et fungerende script og et nyhedsystem som jeg begge selv har kodet. Men på mange sites er der et feks:

Titel på nyhed (5)

hvor (5) angiver hvor mange comments der er til den pågældende nyhed. Altså Count.

Noget i den her stil:

select count * from comment where newsid = " & Request.Querystring("newsid")

Eller noget.

Ved bare ikke hvordan jeg får lavet det sådan at den tæller counts...
Avatar billede neteffect Nybegynder
24. oktober 2002 - 18:03 #1
Du er tæt på:

select count(*) AS commentCount from comment where newsid = " & Request.Querystring("newsid")

...

response.write "(" & rs("commentCount") & ")"
Avatar billede Slettet bruger
24. oktober 2002 - 18:04 #2
SELECT COUNT(id) AS antal FROM comment where newsid = " & Request.Querystring("newsid")

Nu kan du så få fat i antal som du ville udskrive ethver andet sql resultat...
Avatar billede Slettet bruger
24. oktober 2002 - 18:06 #3
ja... :)

Hvis du ikke skal bruge indholdet fra kommentarene til andet end at tælle dem, er det mest hensigtsmæssigt kun at selecte f.eks. id, da det er spild af tid at hente det hele.

Så neteffects eksempel, bare med COUNT(id) istedet :)
Avatar billede intrique Nybegynder
24. oktober 2002 - 18:20 #4
neteffect :

Fatter ik helt hvordan det skal gøres...

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("x.mdb")
Conn.Open DSN

strSQL = "Select Top 50 * from nyheder ORDER BY x DESC;"
countSQL = "select count(*) AS commentCount from comment where x = " & Request.Querystring("newsid")
Set rs = Conn.Execute(strSQL)
set count = Conn.Execute(countSQL)
Do
%>
<b><a href="article.asp?newsid=<%=rs("x")%>"><%=rs("Header")%> (<% response.write "(" & rs("commentCount") & ")" %>)</b></a><br><font class="menu">
Skrevet af <%=rs("Author")%>, nyheden omhandler <%=rs("kategori")%> og var skrevet <%=rs("date")%><br>
<img border="0" src="images/default_stripe.jpg"><br><%=rs("txt")%><br><br>
<% 
  rs.MoveNext

Loop While Not rs.EOF

count.MoveNext

Loop While Not count.EOF

Conn.Close
Set Conn = Nothing
%>

Flto kode ik ? ;)
Avatar billede intrique Nybegynder
24. oktober 2002 - 18:23 #5
Det virker ik lige :)
Avatar billede no_doubt Nybegynder
24. oktober 2002 - 18:23 #6
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("x.mdb")
Conn.Open DSN

strSQL = "Select Top 50 * from nyheder ORDER BY x DESC;"
Set rs = Conn.Execute(strSQL)
set count = Conn.Execute(countSQL)
Do
%>
<a href="article.asp?newsid=<%=rs("x")%>"><b><%=rs("Header")%>

<html>

<head>
<title></title>
</head>

<body>
</b></a>

<p><font class="menu">Skrevet af <%=rs("Author")%>, nyheden omhandler <%=rs("kategori")%> og var skrevet <%=rs("date")%><br>
<img border="0" src="images/default_stripe.jpg"><br>
<%=rs("txt")%><br>
<br>
</font></p>

<p>Der er <%countSQL = "select count(*) AS commentCount from comment where x = " & Request.Querystring("newsid")
%><%response.write "(" & rs("commentCount") & ")"%> nyheder i databasen</p>
</body>
</html>
Avatar billede intrique Nybegynder
24. oktober 2002 - 18:28 #7
noDoubt du har virkelig kodet noget helt andet :)

Ikke lige det

Det skal holdes inden for det jeg har skrevet.. der er en masse udover det.. :o
Avatar billede neteffect Nybegynder
24. oktober 2002 - 18:30 #8
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("x.mdb")
Conn.Open DSN
strSQL = "Select Top 50 * from nyheder ORDER BY x DESC;"
Set rs = Conn.Execute(strSQL)
do while not rs.eof
countSQL = "select count(*) AS commentCount from comment where x = " & rs("x")
set count = Conn.Execute(countSQL)
%>
<b><a href="article.asp?newsid=<%=rs("x")%>"><%=rs("Header")%> (<% response.write "(" & rs("commentCount") & ")" %>)</b></a><br><font class="menu">
Skrevet af <%=rs("Author")%>, nyheden omhandler <%=rs("kategori")%> og var skrevet <%=rs("date")%><br>
<img border="0" src="images/default_stripe.jpg"><br><%=rs("txt")%><br><br>
<% 
  rs.MoveNext
Loop
Conn.Close
Set Conn = Nothing
%>
Avatar billede intrique Nybegynder
24. oktober 2002 - 18:36 #9
Af en eller anden grund viser den ik det forbandede

Nyhedstitel (#)

Kun

Nyhedstitel
Avatar billede intrique Nybegynder
24. oktober 2002 - 18:37 #10
http://skycreat.frip.dk/px/default.asp er adressen hvis du vil se...
Avatar billede neteffect Nybegynder
24. oktober 2002 - 19:07 #11
mystisk, men der var lidt mange parenteser, og <b> krydsede <a>

<b><a href="article.asp?newsid=<%=rs("x")%>"><%=rs("Header")%> (<%=rs("commentCount")%>)</a></b><br><font class="menu">
Skrevet af <%=rs("Author")%>, nyheden omhandler <%=rs("kategori")%> og var skrevet <%=rs("date")%><br>
<img border="0" src="images/default_stripe.jpg"><br><%=rs("txt")%><br><br>
Avatar billede intrique Nybegynder
24. oktober 2002 - 20:44 #12
ADODB.Recordset error '800a0cc1'

Item cannot be found in the collection corresponding to the requested name or ordinal.

/px/default.asp, line 96


<b><a href="article.asp?newsid=<%=rs("x")%>"><%=rs("Header")%> (<%=rs("commentCount")%>)</a></b><br><font class="menu">

Linje 96.. tror det er problemet med  Commentcount
Avatar billede dr-data Nybegynder
25. oktober 2002 - 18:03 #13
bare tjek om du har skrevet det rigtigt, med store/små bogstaver
Avatar billede dr-data Nybegynder
26. oktober 2002 - 05:26 #14
tænker på rs("commentCount"), hvor du så skriver:
....Linje 96.. tror det er problemet med  Commentcount....

altså med stort C :-)
Avatar billede intrique Nybegynder
27. oktober 2002 - 10:29 #15
Hahah løste det :D

Wee.. Jeg fik endelig lidt tid sammen med koden og der gik det op for mig hvad fejlen var :)

<%=count("commentCount")%>

før var det:

<%=rs("commentCount")%>

Og comment proceduren var skrevet i queryen count og ikke rs.. :)

Mange tak Christian, og dr-data da du gav somehow et hint til at kigge på stavefejl :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester