creazione stringa sommando i record

[giovivent]

ho risolto. grazie a tutti.

prima= rec4("attivita")
While Not rec4.EOF 
tutte = stringa &", "&rec4("attivita")
rec4.MoveNext
Wend
rec4.close