Compteur d'enregistrements

**mpat** · 08/11/2005, 15h45

Bonjour,

J'ai une variable qui compte mes enregistrements dans une boucle,
compteur = compteur+1

j'arrive à afficher le résultat en dessous de ma page mais pas au-dessus !
Y a t'il moyen d'affiche le résultat au-dessus de la page

MERCI

**Pymm** · 08/11/2005, 15h51

un compteur ?? pourquoi ne pas utiliser la propriété recordcount ?

pour la position de ton résultat un bout de code serait le bienvenu

**mpat** · 08/11/2005, 15h54

Tu peux m'expliquer record count et le bout de code pour placer le résultat ou je veux

merci

**Pymm** · 08/11/2005, 16h10

quand tu as un objet recordset qui contient les enregistrements que tu as sélectionnés dans ta base, tu fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Response.Write MonRecordSet.recordcount

Ca t'affiche le nombre d'enregistrements que contient ton recordset sans avoir à le parcourir.

pour l'affichage, je ne peux te donner que la facon dont je le fait ne connaissant pas la structure de ton code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
<% @ Language=VBScript %>
<%
'***********************************************************************************
'Création des objets pour les requêtes
   Dim ObjectRecordset
   Dim ObjectConnection
 
   Set Conn = Session("Conn")
   Set ObjectRecordset = Server.CreateObject("ADODB.Recordset")
 
'***********************************************************************************
'Traitement ASP
....
Response.Write ObjectRecordset.recordcount
 
'***********************************************************************************
Response.Write "<HTML>" & chr(10)
 
Response.Write "   <HEAD>" & chr(10)
Response.Write "      <TITLE>Menu Principal</TITLE>" & chr(10)
Response.Write "   </HEAD>" & chr(10)
 
Response.Write "<BODY BGPROPERTIES=""FIXED"">" & chr(10)
Response.Write "  <TABLE WIDTH=""100%"" BORDER=""0"" CELLSPACING=""0"" CELLPADDING=""0"">" & chr(10)
Response.Write "     <TR>" & chr(10)
Response.Write "       <TD ALIGN=""CENTER"" VALIGN=""CENTER"">" & chr(10)
...
Response.Write "       </TD>" & chr(10)
Response.Write "     </TR>" & chr(10)
Response.Write "   </TABLE></CENTER>" & chr(10)
 
Response.Write "</BODY>" & chr(10)
Response.Write "</HTML>" & chr(10)
ObjectRecordSet.Close
Set ObjectRecordSet = Nothing
Set Conn = Nothing
%>

Compteur d'enregistrements

ASP

Discussions similaires

Partager

Partager