Array, Split e Type mismatch

[Giuseppe C]

Ciao a tutti,
Questo che segue è il codice che mi da errore:

	<%
		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...

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

[agenti]

elenco = Split(UtenteLoggato.Fields.Item("Interessi").Value ,",")
prima elimina lo spazio ", "

cmq
un pò illogico l'uso del select case fatto in questo modo


elenco infatti conterrà gli indice dell'array ovvero:

elenco(0) = 11
elenco(1) = 12
elenco(1) = 13

[Giuseppe C]

anche levando lo spazio mi da lo stesso errore...


aiutooooo

[agenti]

stampa questo a video


response.write UtenteLoggato.Fields.Item("Interessi").Value
response.end

[optime]

elenco è un array, NON puoi trattarlo come una variabile! lo devi analizzare con un ciclo for ... next