Contar registros ANTES de lista-los

[leozeferino 0]

Olá!

 

 

Estou fazendo um sisteminha básico de busca no meu site. Gostaria que o código fizesse a busca (até aki beleza) e ANTES de lista-los aparecesse uma frase dizendo quantos registros foram encontrados, tipo "Foram encontrados 10 resultados" . Alguém sabe como?

 

 

Desde já,

 

 

Valewss

[Generation 0]

Uma das Formas é assim:

 

ASP

[*]TotalRegistros = rs.RecordCount

 

[]'s

[meirelles 0]

EXPERIMENTA CONTAR ASSIM

 

ASP

[*]SQL = "SELECT COUNT CAMPO AS TOTALREGISTROS FROM TABELA"

 

[*]SET RS = CONN.EXECUTE(SQL)

 

[*]

 

[*]TOTAL = RS("TOTALREGISTROS")

 

[*]

 

[*]RESPONSE.WRITE TOTAL

[dark0 0]

é..eu sei 3 modos..os 2 primeiros foi como os brothers mostraram aeo outro, é fazendo um loop, e incrementando um contador nele.no final, o contador vai ter o total de registros

[Mário Monteiro 179]

mas no ultimo existe perda de performance desnecessaria

[dark0 0]

depende né mariose o cara vai mostrar os dados na tela mesmo, um contador nao vai tirar a performance do codigoconcorda comigo?

[Mário Monteiro 179]

nãopois vai ter sempre mais um comando dentro do loop

[Marcelo Barcellos 0]

Tem mais uma forma...

Dim QtdeRegistroSet ORs = oConn.Execute(strSQL,QtdeRegistro)Response.Write QtdeRegistro

[meirelles 0]

Tem mais uma forma...

 

 

Dim QtdeRegistro

Set ORs = oConn.Execute(strSQL,QtdeRegistro)

 

Response.Write QtdeRegistro

<{POST_SNAPBACK}>

STRSQL SERIA O QUE EU ESCRIVI LÁ EM CIMA, CASO CONTRÁRIO ELE NÃO BUSCA NADA... VERIFICA ISSO...

[leozeferino 0]

Fala negada!

 

Ae, valewss pelos comentários de todos.

Achei melhor usar o código do Generation e deu certo.

 

 

Brigadão!!

 

 

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Mário Monteiro 179]

Fala negada!

 

Ae, valewss pelos comentários de todos.

Achei melhor usar o código do Generation e deu certo.

 

 

Brigadão!!

 

 

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif   http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

que bom que deu certinho...

[meirelles 0]

o codigo do generation realmente é melhor, sucesso pra ti manow!

[Gelado 0]

como que eu posso inserir esse codigo na minha pagina

o jeito que estou fazendo não funciona.. fica em branco.

 

<center><a href="javascript:history.back(1);" id="allcursos">Voltar</a><br><br>
<%= TotalRegistros%> cursos cadastrados</center><br>

<table width="85%" border="0" align="center" cellpadding="0" cellspacing="2" class="texto" id="allcursos">
<tr></tr>
<tr align="center" bgcolor="#00CCFF" >
  <td width="45"><b>ID</b></td>
  <td width="439"><b>Titulo</b></td>
  <td width="80"><b>Imagem</b></td>
  <td width="71"><b>Editar</b></td>
  <td width="70"><b>Excluir</b></td>
</tr>
<tr>
  <td width="45"> </td>
  <td width="439"> </td>
  <td width="80"> </td>
  <td width="70"> </td>
    <td> </td>
</tr>
<%
	set ss =server.createobject("adodb.recordset")
	ss.open "select DISTINCT top 100 * from tbcursos where atitulo order by aid",conexao,1,2
	do until ss.eof
	TotalRegistros = ss.RecordCount
%>
<tr class="dif">
  <td width="45"><%= ss("aid")%></td>
  <td width="439"><%= ss("atitulo")%></td>
  <td width="80" align="center"><%= ss("aimagem")%></td>
  <td width="71" align="center"><a href="curso.asp?action=editar&codigo=<%= ss("aid")%>"><img src="imagem/imgEdit.gif" width="12" height="12" border="0"></a></td>
  <td width="70" align="center"><a href="javascript: deleta(<%= ss("aid")%>)"><img src="imagem/lixo.gif" width="14" height="12" border="0" alt="Excluir <%= ss("atitulo")%>"></a></td>
</tr>
<%
	ss.movenext
	loop
	ss.close
	set ss =nothing
%>
</table>
<br>
<center>
<a href="javascript:history.back(1);" id="allcursos">Voltar</a></center>

[xanburzum 169]

é por causa da sua string sql

 

select DISTINCT top 100 * from tbcursos where atitulo order by aid

 

altere para

 

select * from tbcursos order by aid

 

recordset.CursorType = 3 (AdOpenDynamic)

 

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

 

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

[Gelado 0]

acabei mudando tudo e estou usando o rs.RecordCount

 

<%if Request.QueryString("action") = "consulta" and request.querystring("titulo")<>"" then 
		Set rs = Server.CreateObject("ADODB.RecordSet")
		if trim(Request.QueryString("titulo")) <> "" then
		rs.Open "Select * From tbcursos Where atitulo like '%" & Request.QueryString("titulo") & "%'Order By aid", 		Conexao,1,2
		TotalRegistros = rs.RecordCount
		end if
%><p><%= TotalRegistros%> cursos cadastrados</p>

vlw pela ajuda!

[xanburzum 169]

beleza, mas lembre-se

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