Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
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
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 %>
>
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
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.