Tæl poster i access db

SELECT count(*) from yourTable

=Dcount("*","YourTable")

SELECT count(*) from yourTable as Indlaeg

forget dcount from ASP

jo men hvordan virker det lidt mere præcist, hvad skal jeg f.eks skrive efter response.write for at den vil udskrive antalet. og skal man ikke stadig have sin set rs = conn.execute(SQL)

<%
' DSNLess forbindelse til databasen
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("dbase.mdb")

Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open strDSN

intSum_users = 0

' Tæller antal poster i tabellen
strSQL = "SELECT COUNT(ID) AS Antalusers FROM users"
Set rs = myConn.Execute(strSQL)
intSum_users = intSum_users + Rs("Antalusers")

%><font face="Trebuchet MS" style="font-size: 9pt"> Der er i alt <%Response.Write intSum_users%> brugere</font>

<%
set MyConn=Server.CreateObject("adodb.connection")
MyConn.Open "DSN=myDSN"
set RS=MyConn.Execute("Select Count(*) from mytable")
myrecordcount=RS(0)
RS.close
set RS=nothing
MyConn.close
Set MyConn=nothing
%>

Eller:

<%
Set objConn=Server.CreateObject("adodb.recordset")
objConn.Open SQLString, Connection, 1, 3
objConn.RecordCount
%>


Eller du kan bytte RecordCount med BookMark:

<%
Set objConn=Server.CreateObject("adodb.recordset")
objConn.Open SQLString, Connection, 1, 3
objConn.BookMark
%>

so in the end it all boils down to
"Select Count(*) from someonestable"
25/05-2003 16:00:03 :o)

Nej! man skal ASP oxo!

Sådan her uden count(*)
<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("MinDB.mdb"))set rs=Server.CreateObject("ADODB.recordset")
sql="SELECT * FROM minTabel"
rs.Open sql,conn
if rs.Supports(adApproxPosition)=true then
  i=rs.RecordCount
  response.write("The number of records is: " & i)
end ifrs.Close
conn.Close
%>

takker for hjælpen alle sammen