Lite längre ner diskuterades det.
<% = RecSet.RecordCount %>
------------------
<A HREF="http://andiee.cjb.net
"I" TARGET=_blank>http://andiee.cjb.net
"I</A> met my maker, I made him cry"
8 svar · 194 visningar · startad av CrYpToNiC
Någon som vet hur man fixar en räknare som räknar antalet inlägg i en gästbok?
Kör en databas där alla inläggen ligger så det borde väl gå att göra nått som räknar antal rader eller nått?
------------------
/CrYpToNiC
Lite längre ner diskuterades det.
<% = RecSet.RecordCount %>
------------------
<A HREF="http://andiee.cjb.net
"I" TARGET=_blank>http://andiee.cjb.net
"I</A> met my maker, I made him cry"
och när jag gav det svaret fick jag en uppläxning om att det var idioti.. så det känns som att det är min uppgift att visa att jag lärt mig nåt :e
SQL = "Select Count(ID) AS antalPoster From Tabell"
Set rs = databas.execute(SQL)
och sen hämtar du antalet med:
<%= rs("antalPoster") %>
MVH
------------------
nakoz
http://flykt.cjb.net/ :)
så här ser filen ut:
<!--#include file="shell-top.txt" -->
<!--#include file="meny.txt" -->
<!--#include file="shell-mid.txt" -->
<!--#Include file="adovbs.inc" -->
<img src="../bilder/lgb.gif"><br>
<p><span class="text">Här kommer alla som har skivit in sig i gästboken.<br></span></p>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../database/gbook.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")
visa = "SELECT * FROM gbook"
RecSet.open visa, Connect, adOpenStatic, adLockOptimistic
Do Until RecSet.EOF
%>
<tr bgcolor="#333333">
<td><span class="newstopic">Namn: </span><span class="text"><%=recSet("namn")%></span></td>
<td><span class="newstopic">Tid: </span><span class="text"><%=recSet("datum")%></span></td>
</tr>
<tr bgcolor="#333333">
<td><span class="newstopic">ICQ#: </span><span class="text"><%=recSet("icq")%></span></td>
<td><span class="newstopic">IP: </span><span class="text"><%=recSet("ip")%></span></td>
</tr>
<tr>
<td bgcolor="#666666" colspan="2"><font size="2" face="Arial, Helvetica, sans-serif"><span class="newstopic">Meddelande:</span><br>
<br><span class="text"><%=recSet("meddelande")%></span><br><br>
<span class="text">Hemsida:</span> <span class="text"><%=recSet("hemsida")%></span><br>
<span class="text">E-mail:</span> <span class="text"><%=recSet("email")%></span>
</td>
</tr>
<tr>
<td> </td>
</tr>
<%
RecSet.MoveNext
Loop
RecSet.Close
Connect.close
%>
</table>
<!--#include file="shell-bottom.txt" -->
vart ska jag lägga in koderna? blir ju bara fel...
------------------
/CrYpToNiC
Så här
<!--#include file="shell-top.txt" -->
<!--#include file="meny.txt" -->
<!--#include file="shell-mid.txt" -->
<!--#Include file="adovbs.inc" -->
<img src="../bilder/lgb.gif"><br>
<p><span class="text">Här kommer alla som har skivit in sig i gästboken.<br></span></p>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../database/gbook.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")
'***Här är räknas posterna
SQL = "Select Count(ID) AS antalPoster From gbook"
Set rs = connect.execute(SQL)
'***********
visa = "SELECT * FROM gbook"
RecSet.open visa, Connect, adOpenStatic, adLockOptimistic
Do Until RecSet.EOF
%>
<tr bgcolor="#333333">
<td><span class="newstopic">Namn: </span><span class="text"><%=recSet("namn")%></span></td>
<td><span class="newstopic">Tid: </span><span class="text"><%=recSet("datum")%></span></td>
</tr>
<tr bgcolor="#333333">
<td><span class="newstopic">ICQ#: </span><span class="text"><%=recSet("icq")%></span></td>
<td><span class="newstopic">IP: </span><span class="text"><%=recSet("ip")%></span></td>
</tr>
<tr>
<td bgcolor="#666666" colspan="2"><font size="2" face="Arial, Helvetica, sans-serif"><span class="newstopic">Meddelande:</span><br>
<br><span class="text"><%=recSet("meddelande")%></span><br><br>
<span class="text">Hemsida:</span> <span class="text"><%=recSet("hemsida")%></span><br>
<span class="text">E-mail:</span> <span class="text"><%=recSet("email")%></span>
</td>
</tr>
<tr>
<td> </td>
</tr>
<%
RecSet.MoveNext
Loop
RecSet.Close
Connect.close
%>
</table>
<!--#include file="shell-bottom.txt" -->
Sen placerar du bara
<%= rs("antalPoster") %>
Där du vill att antalet poster ska visas.
------------------
Utdrag nr 4 ur jispirs regelbok-->Använd alltid gratis tjänster från verktygslådan. :e
Ett gott trams förlänger livet :e
[Redigerat av jispir den 08 dec 2000]
nakoz och andra: jag menade inte att det är idioti att använda rs.recordcount. däremot är det dumt om du endast skall ha fram antal poster, eftersom du då måste hämta fram alla poster till ett recordset först.
om det är en sida där man först visar alla poster, så bör du använda recordcount, eftersom den finns där utan att du behöver ställa en till sql-fråga.
vill du bara veta antalet poster, använd en sql-fråga som liknar den som nakoz gav ovan.
------------------
<A HREF="http://cartman.nu" TARGET=_blank>
that's what brian boitano would do!</A>