RecordCount no mysql

[Clauido José 3]

ola pessoal estou aqui mais uma vez precisando de uma ajuda, estou com um problema ao abrir o mysql preciso saber quantos registro a na tabela e quando eu abro ele só aparece "-1" estou abrindo da seguinte maneira.

 

		SQL = "select * from tclientes" 
		rs.Open SQL,conexao,1,1
		if rs.eof then cont=1 else cont =rs.recordCount
		response.Write(cont)
		response.End()

Já tentei com o rs.Open SQL,conexao,3,3 tb não resolveu

[Gustavo Emygdio Barboza 24]

Pesquise sobre getrows

Se não estiver sucesso diga que posto um exemplo... mas é bem simples vai solucionar...

 

Att;

[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
%>
 

[Clauido José 3]

E isso mesmo valeu obrigado pela ajuda

[xanburzum 169]

[Gustavo Emygdio Barboza 24]

Claudio pode ser assim também...

 

 

 

...

if rs.eof = false and rs.bof = false then

total = rs.GetRows()

total = cint(ubound(total,2))+1

rs.AbsolutePage = 1

response.write total

[xanburzum 169]