Array de sesión adentro de For Next - ayuda

[razeus]

Gracias, hace un rato atrás me pude dar cuenta del ¿Por qué? afuera del For next se perdía la sesión, es casi obvia la respuesta esto de debío a que las sesiones de forma recursiva se sobre escriben solo quedando la última sesión como válida ya que tienen el mismo nombre.

Ahora bien sigo en la lucha de este interesante problema, si bien me di cuenta del problema inicial ahora hay uno más grande.

Tengo:

For i = 0 To n - 1
Dim sNombre AsString
sNombre = dt.Rows(i).Item("Nombre")
objMail.Body = "Estimado Sr. " & sNombre & "OK"
Next

Esto hace traer todos los nombres de la base de datos y mi idea es colocarlos para que dinamicamente el objMail.Body cambie pero no lo hace porque se queda con el último valor de i = n-1; pero no funciona.

¿Cómo podría hacer que objMail.Body sea dependiente de i y así poder desplegar de forma recursiva todos los valores?

objMail.Body.(i) no funciona ya que no es la forma, acepto cualquier idea que me puedan pasar si anidar un if o lo que sea ya que ahora el problema es hacer que objMail.Body sea variable en función de i.

GRACIAS!!!