RecordSet

[BlackPower 0]

Alguém sabe como eu faço para contar qtos registros um recordset retorna sem ter q dar um loop????AT+

[Dudys 0]

podem ser ded 2 maneiras...

 

Rs.Open "SELECT * FROM tabela",Conexao,3,1

total = Rs.RecordCount

 

OU

 

Set Rs = Conn.Execute("SELECT * FROM tabela")

registros = Rs.Getrows()

total = Int(UBOUND(registros,2))+1

[gastao 0]

ouselect count(*) as soma from tabelars("soma") <<<<numero de registros

[LeoncioNT 0]

Estou rodando a seguinte Query, mas o "RecordCount" resulta em -1 --- Qual o comando para que ele retorne 10 que é a qtd de linhas do recordset ?

strQuery = "select data from Tabela order by data desc limit 0,10"

Set objRs = objConn.Execute(strQuery)

response.write objRs.RecordCount <<<< -1

[xanburzum 169]

dependendo da situacaun melhor usar um contatdor normal ou a clausula count do SQL, pois se o seu bd for muito grande o recordcount do objeto recordset para apresentar queda de desempenho
e para usar o RecordCount , seu cursortype tem k ser recordset.CursorType = 3 (AdOpenDynamic)

exemplo:

<%
DIM mySQL, objRS
mySQL = "SELECT * FROM myTable"
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open mySQL, objConn

' Count how many records exist
DIM iRecordCount
iRecordCount = 0
DO WHILE NOT objRS.EOF
iRecordCount = iRecordCount + 1
objRS.MoveNext
Loop

' Display result
Response.Write "(" & iRecordCount & ")"

objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>

SQL COUNT

<!--#INCLUDE VIRTUAL="/includes/connection.asp" -->

<%
DIM mySQL, objRS
mySQL = "SELECT Count(*) AS intTotal FROM myTable"
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open recSQL, objConn

' Display result
Response.Write objRS("intTotal")

objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>