Problema memorizzazione array in variabile di sessione

[fabiodj]

Raga
Sto provando a salvare un array in una variabile di sessione ma non me lo memorizza tanto che anche utilizzando Isempty mi restituisce sempre FALSE ....

<%
'creiamo un array bidimensionale, un po abbondante visto
' che non conosco il numero di controlli del form

reDim arrayForm(1, 255)

intIndice = 0
For intLoop = 1 to Request.Form.Count

'se il numero di controlli del form e uguale a uno
valore =  Request.Form(intLoop)
IF Isnumeric(valore) then 
valore = Cint(valore)
end if  

IF valore <> "0" then
'immagazzino nell'array

campo2 = Request.Form.Item(intLoop)
IF Isnumeric(campo2) then
campo2 = TRIM(Replace(campo2,"€",""))
end if
arrayForm(1, intIndice) =  Request.Form.Item(intLoop)
intIndice = intIndice + 1
end if 
Next

'ridimensiono l'array alle giuste dimensioni, dato che ora
'conosco il numero di controlli del form e tolgo il campo invia

ReDim Preserve arrayForm(1, intIndice-1)


Session("cart") = arrayForm
prova = Session("cart")

response.write Isempty(prova)


%>