unire questi 2 oggetti

[yro]

come da titolo dovrei uniri questi 2 oggetti in uno solo,quindo con una stringa sql sola,perche dovrei fare un ciclo coi 2 oggetti ma non mi riesce!!

'---------------------prelevo nome agente--------------------------
set rs3 = server.CreateObject("adodb.recordset")
strSQL3 = "SELECT codiceagente from tabcontratto  where promozione = '"&idpromo&"' group by codiceagente"
rs3.open strSQL3, objConn, 0, 3
strAgente = rs3.Fields.Item("codiceagente").value
'--------------------numero contratti per agente------------------------
set rs4 = server.CreateObject("adodb.recordset")
strSQL4 = "SELECT count (idcontratto) AS cont_agente FROM tabcontratto WHERE promozione = '"&idpromo&"' AND codiceagente = '"&strAgente&"'"
rs4.open strSQL4, objConn, 0, 3

se potete aiutarmi...grazie!

[yro]

è impossibile??

[yro]

'---------------------prelevo nome agente--------------------------
set rs3 = server.CreateObject("adodb.recordset")
strSQL3 = "SELECT DISTINCT  codiceagente from tabcontratto  where promozione = '"&idpromo&"'"
rs3.open strSQL3, objConn, 0, 3
strAgente = rs3.Fields.Item("codiceagente").value
'--------------------numero contratti per agente------------------------
set rs4 = server.CreateObject("adodb.recordset")
strSQL4 = "SELECT count (idcontratto) AS cont_agente FROM tabcontratto WHERE promozione = '"&idpromo&"' AND codiceagente = '"&strAgente&"'"
rs4.open strSQL4, objConn, 0, 3

riformulo!

sono costretto a tenere queste 2 querry separate o le posso unire sotto un'unico oggetto rsN???

nel caso non lo posso unire...come posso fare per fare un ciclo che comprenda questi 2 oggetti assieme?

[heroes3]

apri rs3
conti rs e lo metti in un var
chiudi rs3
riapri rs3
esegui query di select
loop fino che fine

[yro]

Originariamente inviato da heroes3
apri rs3
conti rs e lo metti in un var
chiudi rs3
riapri rs3
esegui query di select
loop fino che fine

:master:

speta che provo!

[yro]

non mi riesce...