home *** CD-ROM | disk | FTP | other *** search
/ Internet Pratica / IPRAT_01.iso / tutoriais / ASP / maxrecords / maxrecords.txt
Encoding:
Text File  |  2002-10-30  |  2.2 KB  |  53 lines
  1. ASP - Propriedade MaxRecords 
  2.  
  3.  
  4. Oscar Pires Θ desenvolvedor ASP e Visual Basic, atualmente voltado para o e-commerce, e trabalha com sistemas para controle dos dados de lojas.
  5.  
  6. 01/10/2001 - Coluna n║ 04
  7.  
  8. ASP - Propriedade MaxRecords
  9.  
  10. Neste artigo eu mostro o uso de uma propriedade bastante ·til, o MaxRecords, usado para limitar o n·mero de registros a serem exibidos.
  11.  
  12. Caso vocΩ marque o valor de maxrecords para 5, independente do n·mero de registros existentes, ele s≤ irß exibir os 5 registros, de acordo com a instruτπo sql.
  13.  
  14. Esta propriedade Θ util para diversos casos, por exemplo, vocΩ deseja exibir os 7 produtos mais caros que exista no banco de dados, o SQL seria algo como; "SELECT * FROM produtos Order by preco DESC" e maxrecords igual a 7. Neste caso ele varre a tabela produtos e ordena os produtos pelo preτo mais alto (DESC), e na hora de exibir, a propriedade maxrecords limita a exibiτπo para os 7 produtos mais caros.
  15.  
  16. DESC = Decrescente
  17. ASC = Crescente
  18.  
  19. Do mesmo jeito que usamos esta tΘcnica para exibir os produtos mais caros existentes, pode-se usar para exibir os usußrios que mais visitam o site, as pßginas mais visitadas, etc. Lembrando que devemos buscar os valores em um banco de dados.
  20.  
  21. Abaixo segue o exemplo completo e comentado, para capturar os 7 produtos mais caros;
  22.  
  23. <%
  24. set conn = server.createobject("adodb.connection")
  25. conn.open "Conexao"
  26. 'aqui inicia-se a conexπo, especifique o DSN, ou caminho para o DB
  27. sql = "SELECT * FROM produtos ORDER BY preco DESC"
  28. ' acima esta a instruτπo que determina o critΘrio para exibiτπo
  29. set rs=server.createobject("adodb.recordset")
  30. rs.maxrecords = 7
  31. ' aqui vocΩ especifica a quantidade mßxima que deseja que seja exibida
  32. rs.open sql, conn
  33.  
  34. ' abaixo estß o LOOP para exibir os 7 produtos mais caros
  35. response.write "PRODUTOS MAIS CAROS"
  36.  
  37. do while not rs.eof
  38. response.write RS("NomeProduto") & " apenas: " & FormatCurrency(rs("preco")) & "<br>"
  39. rs.movenext
  40. loop
  41.  
  42. %>
  43.  
  44. Note que se vocΩ trocar o DESC por ASC, serß exibido os produtos mais baratos.
  45. Semana que vem eu volto com mais novidades.
  46.  
  47. AtΘ mais.
  48.  
  49. Oscar Pires
  50. blade@imasters.com.br
  51.  
  52. Todos os direitos autorais dos artigos pertencem ao seu autor.
  53.