problema con i loop

[carmi]

ciao,

ho 3 loop innidati tra loro, non riesco però a far ciclare il secondo(rscodcolore) ed il terzo(rsdescrizione) in base ai risultati del primo!!!!!


set conn=server.createobject("adodb.connection")
set rslente=server.createobject("adodb.recordset")
set rscodcolore=server.createobject("adodb.recordset")
set rsdescrizione=server.createobject("adodb.recordset ")
set rsassorbimento = server.createobject("adodb.recordset")

Call openConn2(conn,rslente,rscodcolore,rsdescrizione)

rslente.open "SELECT id_colore FROM associazione_colori_lenti where id_lente = "&request("id_lente") ,conn,3,3
rscodcolore.open "select codice_colore from colori_lenti where id = "&rslente("id_colore")&"" ,conn,3,3
rsdescrizione.open "SELECT descrizione FROM colori_lenti where codice_colore = '"&rscodcolore("codice_colore")&"'" ,conn,3,3
rsassorbimento.open "SELECT assorbimento FROM colori_lenti where codice_colore = '"&rscodcolore("codice_colore")&"'" ,conn,3,3
i= 0

do while Not rslente.eof


do while Not rscodcolore.eof
response.Write rscodcolore ("codice_colore")

do while Not rsdescrizione.eof
response.Write rsdescrizione ("descrizione")
'rsdescrizione.close
rsdescrizione.MoveNext
loop

rscodcolore.MoveNext
loop

rslente.MoveNext
loop
%>

[Roby_72]

Che errore ti da?
Le query sono corrette?

Roby

[carmi]

si le query sono corrette, l'errore che ho è che praticamente esegue il primo ciclo e basta, per gli altri 2 stampa solo un record(quando invece dovrebbe stamparne 100)!!!