He utilizado el siguiente codigo para realizar el recuento de registros:
Código:
<%
'realitzam la consulta
Dim num_coment
Dim num_coment_numRows
Set num_coment = Server.CreateObject("ADODB.Recordset")
num_coment.ActiveConnection = MM_Esporlesbc_STRING
num_coment.Source = "SELECT * FROM Comentaris_nov WHERE Id = " & Novetats.Fields("id") & ""
num_coment.CursorType = 0
num_coment.CursorLocation = 2
num_coment.LockType = 1
num_coment.Open()
num_coment_numRows = 0
num_coment_registros = num_coment.RecordCount
Response.Write(num_coment_registros)
%>
pero no me devuelve nada, donde esta el error?