Array de sesión adentro de For Next - ayuda

[razeus]

Hola a todos;
Tengo un problema que es el siguiente:
........
cmd = New OleDbDataAdapter(s, cnn)
'
' Llenar el DataTable
dt = New DataTable
cmd.Fill(dt)
'
n = dt.Rows.Count
'intento cargar en sesi¢n
'cmd.Fill(dt, "email")
Dim arrString(dt.Rows.Count - 1) AsString
Dim iCnt AsInteger
For iCnt = 0 To dt.Rows.Count - 1
arrString(iCnt) = dt.Rows(iCnt)("email")
Response.Write(arrString(iCnt)) ' funciona a la perfección
Session.Item("arr") = arrString(iCnt)
Response.Write(Session("arr") & "<br>") ' fuinciona
Next

Response.Write(">>>" & Session.Item("arr").ToString() & "OHH") ' ***

***: No funciona afuera del For Next, solo coloca el último valor de la base de datos.

¿Tienen alguna idea de como hacer que la variable sesión agarre realmente todos los valores adentro del For Next y los pueda utilizar afuera en otro lado de la página?

Muchas gracias.