ciao ragazzi.

Vi spiego la mia questione: Ho fatto un programmino che funziona da inventario per la mia azienda. Nell'inventario, registro anche i software installati in ogni computer.

Il punto è che i computer non hanno gli stessi software e soprattutto possono essere un numero imprecisato. Quindi nel mio DB ho fatto un bel campo memo dove memorizzare, separati da virgola, i miei software.

Ora pero' il boss, vuole sapere quanti sono ogni singolo software!

Es.:

Office - 10
VPN - 8
photoshop - 6
...

il codice sotto postato separa ogni stringa contenuta nel campo memo e la mostra.

codice:
<% 
While (NOT rs.EOF) 'looppa finchè non arriva alla fine del record
	myArray = split(rs.Fields.Item("SOFTWARE").Value,",") 'Elimino tutte le virgole dal campo software e memorizzo in myarray
		for x = 0 to ubound(myArray) 'assegno a x il valore 0 incrementale, cioè si ferma solo quando arriva alla fine dell'array
			novirgola = Trim(myArray(x)) 'memorizzo in novirgola il contenuto dell'array nella posizione specificata da x
			response.write novirgola & "
"
		next
	rs.MoveNext()
Wend
%>
Il punto è che, ovviamente, mostra una cosa del tipo:

Office
vpn
photoshop
Office
VBS
vpn
.....

Io vorrei poterli raggruppare e metterci un counter affianco.

Mi aiutate per favore?

many thank!