ciao ho questo codice:

codice:
set rsSub = server.CreateObject("adodb.recordset")
strSQLsub = "SELECT codiceagente FROM tabagente WHERE collegato = '"&arr_id(y)&"'"
rsSub.open strSQLsub, objConn, 0, 3

do while not rsSub.eof
strSubagenti = rsSub.fields.item("codiceagente").value
rsSub.movenext
loop
rsSub.close
set rsSub = nothing

if strSubagenti <> "" then

if livello = 2 then
strTotsub = "0"
else

set rs5 = server.CreateObject("adodb.recordset")
strSQL5 = "SELECT SUM(fissoxl1) AS strTotsub FROM tabcontratto WHERE codiceagente IN ('"&strSubagenti&"') AND  accettato = true AND datacont BETWEEN #"&strdaData&"# AND #"&straData&"#"
rs5.open strSQL5, objConn, 0, 3
response.Write(strSql5)
strTotsub = rs5.fields.item("strTotsub").value
rs5.Close
Set rs5 = Nothing
end if
end if
strSubagenti mi da 3 risultati ma quando inserisco la variabile nella query in rs5 e stampo la query mi da un risultato solo!
come mai?
ho sbagliato il ciclo?o la query??

grazie!