Set Objconn = Server.CreateObject("ADODB.Connection")
Objconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("dindatabas.mdb")
Objconn.open
SQL = "Select Count(*) AS intAntalinlagg from dinTabell"
Set RS = Objconn.execute(SQL)
Response.Write "Vi har "&RS("intAntalinlagg")&"poster i vår databas