non so se possa andare così, l'ora tarda mi annebbia le rotelle, cmq prova:

codice:
sql="select a.id_messaggio as id_messaggio,a.messaggio as messaggio, (select count(*) from TLB_commenti c where c.id_messaggio=a.id_messaggio) as commenti from TBL_messaggi a"

rs.open sql,conn,1,1

while not rs.eof
response.write rs("id_messaggio") & "
" & rs("messaggio") & "
" & rs("commenti") & "
"
rs.movenext
wend