Contare ed escludere records

[fraude]

Ciao a tutti, da una query estraggo il valore strNome:

Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open strSQL, objconn, 3, 3

Do Until objRs.Eof

strNome = objRS("nome")

objRs.MoveNext
Loop

Se volessi contare quante volte è presente strNome con lo stesso valore (ad esempio: Roma, Roma, Roma,...) ed escluderlo dalla stampa dei records, se lo stesso strNome è presente meno di 8 volte, come devo fare?

Grazie

[99eros9]

puoi fare un count e un group by nella query.

.. direi anche un having visto che si tratta di escludere gruppi di records, se non ho capito male

[fraude]

Originariamente inviato da 99eros9
puoi fare un count e un group by nella query.

E' una query molto complessa e per riuscire a farla funzionare ho perso sempre tanto di quel tempo... non vorrei modificarla... se fosse possibile fare l'operazione lavorando (forse) con un array o direttamente sul recordset... grazie

si ho già un having nella query attuale...

[99eros9]

lo so che vuoi dire ma ti converrebbe perderci un po di tempo, sarebbe la miglior cosa da fare... altrimenti assegni il recordset ad un array bidimensionale con getRows() e poi lo ordini... ma secondo me, se i risultati sono tanti, rischi di consumare tante risorse.

[fraude]

Vorrei provare con GetRows, puoi farmi un esempio per favore?

[maximum]

Posta la query vediamo se possiamo aggiustarla con la COUNT.

[fraude]

Originariamente inviato da maximum
Posta la query vediamo se possiamo aggiustarla con la COUNT.

grazie, ma l'hai voluto tu...:

strSQL = "SELECT Last(myTbl.ID) AS ID, myTbl.Cab, Last(myTbl.mon) AS mon, Last(myTbl.dist) AS dist, Last(myTbl.dData) AS dData, Last(myTbl.tot) AS tot, myTbl.NomeM, myTbl.IDM FROM myTbl GROUP BY myTbl.dist, myTbl.Cab, myTbl.IDM, myTbl.NomeM HAVING (((Last(myTbl.dData))=#2005/01/01#) AND ((Last(myTbl.tot))=0) AND ((myTbl.IDM)="&nrMeseprec&" Or (myTbl.IDM)="&nrMeseprec1&" Or (myTbl.IDM)="&nrMeseprec2&" Or (myTbl.IDM)="&nrMeseprec3&" Or (myTbl.IDM)="&nrMeseprec4&")) AND (myTbl.dist = 'AAA' OR myTbl.dist = 'BBB') ORDER BY Last(myTbl.ID), myTbl.Cab, myTbl.IDM"

[maximum]

Dov'è il nome? Non riesco ad individuarlo.

[fraude]

Originariamente inviato da maximum
Dov'è il nome? Non riesco ad individuarlo.

Scusa nella query è MON...

[maximum]

Ci provo:

strSQL = "SELECT Last(myTbl.ID) AS ID, 
	         myTbl.Cab, 
	         COUNT(Last(myTbl.mon)) AS mon, 
	         Last(myTbl.dist) AS dist, 
	         Last(myTbl.dData) AS dData, 
	         Last(myTbl.tot) AS tot, 
	         myTbl.NomeM, 
	         myTbl.IDM 
	    FROM myTbl 
	   GROUP BY myTbl.dist, myTbl.Cab, myTbl.IDM, myTbl.NomeM 
	   HAVING (((Last(myTbl.dData))=#2005/01/01#) AND ((Last(myTbl.tot))=0) 
	      AND ((myTbl.IDM)="&nrMeseprec&" Or 
	           (myTbl.IDM)="&nrMeseprec1&" Or 
	           (myTbl.IDM)="&nrMeseprec2&" Or 
	           (myTbl.IDM)="&nrMeseprec3&" Or 
	           (myTbl.IDM)="&nrMeseprec4&")) 
	      AND (myTbl.dist = 'AAA' OR myTbl.dist = 'BBB') 
	    ORDER BY Last(myTbl.ID), myTbl.Cab, myTbl.IDM"