Access - Marti

Quisiera obtener una cadena concatenada de los valores de texto de un campo de una base de datos, de todos sus registros.

Por ejemplo, obtener todos los valores del campo "e-mail" de una base de datos Access de la siguiente forma:

[email protected];[email protected];[email protected]; ...

dim camp_str_mail as string
dim nom_rec as adodb.Recordset

while (nom_rec.eof<>TRUE)
camp_str_mail=camp_str_mail & ";" & nom_rec!email
nom_rec.Movenext
wend