contare record

[marco25b]

Ciao a tutti!!
Vorrei contare i recond fino a un massimo di 30... cioè se ci sono 31 record si deve fermare a 30 ... allora ho scritto questo .. ma... mi escono numeri assurdi!!

<%

sqlcount = "SELECT TOP 30 * FROM Messaggio where ID='" & rsM("id")& "'ORDER BY id"
Set RScounts = Conn3.Execute(sqlcount)
rMcounts = RScounts(0)

%>

ma dove sbaglio???

grazie 1000

[Roby_72]

Scusa ma non ti seguo.
A che ti serve contare un numero di record che già conosci? :master:
Speiga meglio al limite il motivo per il quale intendi contarli...

Roby

[marco25b]

ciao roby,
ho impostato 1 numero massimo di messaggi (30) da visualizzare , ma l'utente puo riceverne altri; cioè anche se la sua “casella è piena” i messaggi rimangono all’interno del db. ora conta tutti i record invece dovrei fermarlo al un numero che ho impostato

[Roby_72]

Ma quindi tu devi estrarre solo i primi 30 record, non contarli, visto che non ha senso...
La query è corretta ma questa

rMcounts = RScounts(0)

non ti serve a niente.
Tu devi recuperare campo per campo...

Roby

[marco25b]

forse non ho capito io ...
es i messaggi contenuti nel db sono 40 quelli visualizzzati nella pagina sono 30 come faccio a far contare i messaggi ricevuti ma a far fermare il contatore a un max di 30 record

[Roby_72]

Ma li devi contare o visualizzare?

Roby

[marco25b]

visualizzare

[Roby_72]

Ed allora questa query come base di partenza va bene:

sqlcount = "SELECT TOP 30 * FROM Messaggio where ID='" & rsM("id")& "' ORDER BY id"
Set RScounts = Conn3.Execute(sqlcount)

Il tuo problema potrebbe essere che nonostante tu desideri visualizzarne solo 30 in realtà te li fa vedere tutti...
Il problema nasce dal fatto che la query non riesce a fermarsi non avendo un altro termine di paragone.
Dovresti aggiungere, nell'order by, un altro campo attraverso il quale ordinare.

Roby

[marco25b]

scusami roby ma ho gia impostato così..

<%

sqlcount = "SELECT TOP 30 * FROM Messaggio where ID='" & rsM("id")& "'ORDER BY id"
Set RScounts = Conn3.Execute(sqlcount)
rMcounts = RScounts(0)

%>

quando elimino top 30 * mi conta i record presenti. con il codice che ho inserito su invece, mi esce un numero assurdo

[Roby_72]

Non ci siamo capiti..
rs(0) non ti serve....
Tu devi visualizzare, non contare!!!!

La order by, nonostante il TOP 30 non si ferma al 30° record perché gli ID attravero i quali ordini è sono gli stessi con i quali confronti.. Devi aggiungere un campo nell'order by...
Ad esempio, ma è solo un esempio:

sqlcount = "SELECT TOP 30 * FROM Messaggio where ID='" & rsM("id")& "' ORDER BY id, data"
Set RScounts = Conn3.Execute(sqlcount)

Roby