creazione stringa sommando i record

[giovivent]

Ciao,

devo creare una stringa che va a sommare i record usciti da una query.
come posso fare?

Sto provando in questo modo:

While Not rec4.EOF 
stringa=rec4("attivita")
rec4.MoveNext
Wend
rec4.close

Ma ovviamente sbaglio. La query in questione mi restituisce due valori per esempio:

A18 e A19

voglio creare una stringa che mi consenta di utilizzare quei valori in un altra query che utilizzi IN ( stringa)

come posso fare?

[giovivent]

ho risolto. grazie a tutti.

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

[optime]

puoi evitare di fare due query sql...

select colonne from tabella where colonna in (select colonna from altra_tabella)

[giovivent]

non funge:

sql5="select * from produzione WHERE CONTACTACT_CODE IN (select * from anagrafica_contratti_attivita WHERE idcontratto="&rec2("id")&")"

mi dice

È stata scritta una sottoquery che può restituire più campi senza utilizzare la parola riservata EXISTS nella proposizione FROM della query principale. Modificare l'istruzione SELECT nella sottoquery per richiedere soltanto un campo.