while rsCierreGrupos.eof = false
response.write rsCierreGrupos("f_cierre")&"-"&rsCierreGrupos("grupo")&"<br>"
sqlCasosCuota="Select count(*) as casos from grupo_y_orden where left(grupo_orden,4) = '" &rsCierreGrupos("grupo")& "' and cod_conce = '"&dealer&"'"
response.write "casos cuota: " & sqlCasosCuota & "<br>"
response.write "casos cuota " & rsCasosCuota("casos") & "<br><br>"
rsCierreGrupos.movenext
wend