Ciao a tutti,
Questo che segue è il codice che mi da errore:
codice:
	<%
		dim elenco
		elenco = Split(UtenteLoggato.Fields.Item("Interessi").Value,", ")
	             If (NOT UtenteLoggato.EOF) then
		Select case(elenco)
		case 11: lbl_stato = "undici"
		case 12: lbl_stato = "dodici"
		case 13: lbl_stato = "tredici"
		case else lbl_stato = ""
		end select
	             end if
	%>
la variabile "elenco" contiene un'array (11, 12, 13) il quale dovrebbe diventare

11
12
13

e poi tramite il "select case" diventare

undici
dodici
tredici


solo che mi da questo errore...

codice:
Microsoft VBScript runtime error '800a000d' 

Type mismatch 

/areariservata/index.asp, line 146
la linea 146 è quella cn "elenco = ...."

grazie per la collaborazione.

buone feste a tutti
ciao