La funcion mysql_num_rows() desde asp

[ildelian]

Asi a ojo de buen cubero +- seria esto.

Código ASP:

Public Function Cuenta_Rows(Query) As Integer
 
Dim conn As Object
Dim SQLq As String
Dim rs As Object
 
set conn= server.CreateObject("ADODB.Connection")
Conn.Open application("CadenaConexion")
 
SQLq = "SELECT COUNT(1) CUENTA " & Query
 
Set rs = conn.execute(sqlcount)
 
Cuenta_Rows = cINT(rs("CUENTA"))
 
End Function
 

En la variable Quey de entrada le pasas la query desde el from con todos los where y tal de la query.