Tælle poster i min database ?

Er det måske fordi jeg ikke må tælle med numInStock, som er tilfældige tal?

den letteste måde at tælle poster på er følgende;

"select count(id) as antalposter from dintabel"

response.write rs("antalposter")

måske var det noget der kunne bruges

Jo tak, hvor skal jeg sætte det ind?

Altså hvor skal strengen stå: "select count(id) as antalposter from products" ???

en sql-sætning må du sætte hvor du end har løst til - bare du har en databaseconnection og det er inden du skal udskrive indholdet fra sql'en

Jeg får fejl, kan du se hvad der er galt?

<%
Dim Rs

Set Rs = Server.CreateObject("ADODB.Connection")
Rs.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../e-handel/db/database.mdb")

sql = "SELECT productName, numInStock, productPrice, * FROM products"

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open sql, Rs
%>
<%
i = 1
While NOT objRec.EOF
"select count(productID) as antalposter from products"

If i mod 2 = 0 then

%>
                          <tr>
                            <td>Kr&nbsp;<%=objRec("productPrice")%>,-&nbsp;</td>
                            <td><%=objRec("productName")%></td>
                            <td valign="top"><%=objRec("numInStock")%></td>
                          </tr>
                          <% else %>
                          <tr>
                            <td bgcolor="#EEEEEE">Kr&nbsp;<%=objRec("productPrice")%>,-&nbsp;</td>
                            <td bgcolor="#EEEEEE"><%=objRec("productName")%></td>
                            <td bgcolor="#EEEEEE" valign="top"><%=objRec("numInStock")%></td>
                          </tr><%Response.Write rs("antalposter")%>
                          <%
                          end if
objRec.MoveNext
i = i + 1
Wend

objRec.close
Rs.Close
SEt Rs = Nothing
%><tr><td height="10"><%Response.Write rs("antalposter")%></td></tr>

luk pga. ingen svar!

ja - jeg kan sagtens se hvad fejl der er...