Numero di records in una query

<%
'##################################
'#Come indentificare il numero di
'#record restituiti da una query
'##################################

Dim oConn,oRS

Set oConn = Server.CreateObject("ADODB.Connection")

DataBasePath = "c:inetpubwwwrootdatabasedb.mdb"

oConn.Open "DRIVER={Microsoft Access_
 Driver (*.mdb)};DBQ=" & DataBasePath

SQL = "Select count(*) As NumeroRecord From tabella")
Set oRS = oConn.Execute(SQL)

Response.Write "Record nel database: " & oRS("NumeroRecord")

Set oRS = Nothing

oConn.Close
Set oConn = Nothing
%>