dim arIn arIn = session("archivo") if isArray(arIn) then for x = 0 to UBound(arIn) Mail.AddAttachment (Server.Mappath("/adjuntos/""" & arIn(x) & """")) next end if