Concatenare i dati di un recordset in una variabile stringa

[erin]

Devo concatenare i dati di un recordset in una variabile stringa ho fatto questo script per ma non mi funziona potete dare un'occhiata?
GRAZIE

dim TM_attivita, CString
TM_attivita = ""
rs_attivita.movefirst
While (NOT rs_attivita.EOF)
CString = ""
if not isnull(rs_attivita.Fields.Item("Data").Value)=true then
CString = CString+CStr(rs_attivita.Fields.Item("Data").Value )
end if

if not isNull(rs_attivita.Fields.Item("NotaAttivita").Val ue)=true then
CString = CString+trim(rs_attivita.Fields.Item("NotaAttivita ").Value)
end if
TM_attivita = TM_attivita+CString+CHR(13)
rs_attivita.MoveNext()
Wend

[ZeroCool981]

mmm... non ho mai visto concatenare le stringhe in asp con il + .
io di solito concateno le stringhe con &

dim TM_attivita, CString
TM_attivita = ""
rs_attivita.movefirst
Do While NOT rs_attivita.EOF
CString = ""
if not isnull(rs_attivita.Fields.Item("Data").Value)=true then
CString = CString & CStr(rs_attivita.Fields.Item("Data").Value)
end if

if not isNull(rs_attivita.Fields.Item("NotaAttivita").Val ue)=true then
CString = CString & trim(rs_attivita.Fields.Item("NotaAttivita").Value )
end if
TM_attivita = TM_attivita & CString & CHR(13)
rs_attivita.MoveNext()
loop

prova così.

[erin]

MITICO !
Così funziona, l'ultimo problema e che non mi prende un campo memo , si deve formattare in un modo particolare?

[ZeroCool981]

Un campo memo con caratteri standard quindi solo lettere e numeri dovrebbe prendertelo senza problemi. Se vai a inserire apostrofi o roba simile devi fare una funzione che te li formatti. Ciauz :tongue:

[erin]

Ora funziona, grazie