Cultar duas vezes a mesma tabela

[paulojorge3l 0]

Olá pessoal preciso consultar duas vezes a mesma tabela até ai beleza funciona só que na hora da consulta rodar os resultados só roda o do primeiro loop do segundo nao traz nada.

vamos a estrutura

 

sql = " SELECT * FROM sessao WHERE sessao.id_categoria = 1 GROUP BY sessao.id_categoria "

	Set RSA = Conn.Execute(Sql)

	sql = " SELECT * FROM sessao WHERE sessao.id_item = '"&RSA("ID_ITEM")&"'"

	Set RSB = Conn.Execute(Sql)

					<% Do While Not RSA.EOF %>
					<p><%=RSA("categoria")%></p>

					<% Do While Not RSB.EOF %>
					<p><%=RSB("item")%></p>
					<% RSB.Movenext %>
					<% loop %>
					

						
					<% RSA.Movenext %>
					<% loop %>

no primeiro loop roda certinho já no segundo ele não traz mais nada

[Igor Soto 0]

Olá pessoal preciso consultar duas vezes a mesma tabela até ai beleza funciona só que na hora da consulta rodar os resultados só roda o do primeiro loop do segundo nao traz nada.

vamos a estrutura

 

sql = " SELECT * FROM sessao WHERE sessao.id_categoria = 1 GROUP BY sessao.id_categoria "

	Set RSA = Conn.Execute(Sql)

	sql = " SELECT * FROM sessao WHERE sessao.id_item = '"&RSA("ID_ITEM")&"'"

	Set RSB = Conn.Execute(Sql)

					<% Do While Not RSA.EOF %>
					<p><%=RSA("categoria")%></p>

					<% Do While Not RSB.EOF %>
					<p><%=RSB("item")%></p>
					<% RSB.Movenext %>
					<% loop %>
					

						
					<% RSA.Movenext %>
					<% loop %>

no primeiro loop roda certinho já no segundo ele não traz mais nada

 

Estranho, você já testou a segunda consulta individualmente no SGBD pra ver tem mesmo alguma coisa pra retornar?

 

já tentou com RecordSet?

 

Set RSA = Server.CreateObject("adodb.recordset")
Set RSA.ActiveConnection = Conn
RSA.CursorType = 3
RSA.Open SQL

Set RSB = Server.CreateObject("adodb.recordset")
Set RSB.ActiveConnection = Conn
RSB.CursorType = 3
RSB.Open SQL

Abraço.

[xanburzum 169]

abra dois recordsets diferentes, tipo

 

<!--#include file="conn/conexao1.asp"-->
   <% 'abrir a conexao
   call abreconexao
   'crio o rsselect para verificar se os dados jah estaun cadastrados
   set rsselect=server.createobject("ADODB.Recordset")
   'crio o SQLselect
   SQLselect="SELECT login FROM login WHERE login='"&varlogin&"'"
   rsselect.open SQLselect,conexao,1,3
   if not rsselect.eof then
   		response.redirect("incluir_form_treina.asp?msgeof=1")
		set rsselect=nothing
   else	
   		'crio o rsselect2 para inseiri os dados no bd
   		 set rsselect2=server.createobject("ADODB.Recordset")
		'crio o rsselect2 pra incluir no bd
		   SQLselect2="SELECT email FROM login WHERE login='"&varlogin&"'"
		rsinsert.open SQLselect2,conexao,1,3
		response.redirect("administracao_treina.asp?msg=1")
		set rsselect2=nothing
	end if 
	call fechaconexao %>