Gostaria da ajuda de todos neste código pois ele não esta funcionando. Ele deveria fazer acesso a um banco de dados access que cadastra artigos na tabela clipping e os assuntos destes artigos na tabela assunto. Nesta página gostaria de exibir todos os artigos cadastrados divididos por assunto, veja o exemplo:
Assunto 1:
Artigo do assunto 1
resumo do artigo
Artigo do assunto 2
resumo do artigo
Artigo do assunto 3
resumo do artigo
....
Assunto 2:
Artigo do assunto 1
resumo do artigo
Artigo do assunto 2
resumo do artigo
Artigo do assunto 3
resumo do artigo
....
Assunto 3:
Artigo do assunto 1
resumo do artigo
Artigo do assunto 2
resumo do artigo
Artigo do assunto 3
resumo do artigo
....
Estou utilizando o código abaixo, tem algum erro que não consigo resolver, pois quando faço teste ele apresenta todos os artigos ordenados pelo assunto (criterio sql), porém não consigo agrupar e apresentar o nome do assunto, na verdade não estou conseguindo associar o id da tabela clipping com o nome na tabela assunto, quem puder ver o que esta errado e me ajudar, agradecerei eternamente.
<!--#include virtual="/sco/comuns.asp" -->
<%
'Realiza a conexão com o banco de dados Access
Set conn_tt = Server.CreateObject("ADODB.Connection")
conn_tt.ConnectionTimeout = 10000
conn_tt.CommandTimeout = 10000
conn_tt.Open Application("stringconn")
'Consulta assunto
sql = "select * from assunto"
set rs_assunto=conn_tt.execute(sql)
'Consulta os clippings de acordo com o filtros
sql = "select * from clipping2 order by assunto"
set rs_alunos_turma=conn_tt.execute(sql)
%>
<% if rs_alunos_turma ("assunto") = rs_alunos_turma("id") then %>
<%= rs_assunto("assunto")%>
<% end if %>
<%
if not rs_alunos_turma.eof then
data_in = cdate("01/01/2300")
end if
do while not rs_alunos_turma.eof
%>
<%=rs_assunto("id")%>
' Instrução que recebe o clique do usuário e o leva ao artigo pretendido
Pergunta
luciano.soares
Amigos
Gostaria da ajuda de todos neste código pois ele não esta funcionando. Ele deveria fazer acesso a um banco de dados access que cadastra artigos na tabela clipping e os assuntos destes artigos na tabela assunto. Nesta página gostaria de exibir todos os artigos cadastrados divididos por assunto, veja o exemplo:
Assunto 1:
Artigo do assunto 1
resumo do artigo
Artigo do assunto 2
resumo do artigo
Artigo do assunto 3
resumo do artigo
....
Assunto 2:
Artigo do assunto 1
resumo do artigo
Artigo do assunto 2
resumo do artigo
Artigo do assunto 3
resumo do artigo
....
Assunto 3:
Artigo do assunto 1
resumo do artigo
Artigo do assunto 2
resumo do artigo
Artigo do assunto 3
resumo do artigo
....
Estou utilizando o código abaixo, tem algum erro que não consigo resolver, pois quando faço teste ele apresenta todos os artigos ordenados pelo assunto (criterio sql), porém não consigo agrupar e apresentar o nome do assunto, na verdade não estou conseguindo associar o id da tabela clipping com o nome na tabela assunto, quem puder ver o que esta errado e me ajudar, agradecerei eternamente.
<!--#include virtual="/sco/comuns.asp" -->
<%
'Realiza a conexão com o banco de dados Access
Set conn_tt = Server.CreateObject("ADODB.Connection")
conn_tt.ConnectionTimeout = 10000
conn_tt.CommandTimeout = 10000
conn_tt.Open Application("stringconn")
'Consulta assunto
sql = "select * from assunto"
set rs_assunto=conn_tt.execute(sql)
'Consulta os clippings de acordo com o filtros
sql = "select * from clipping2 order by assunto"
set rs_alunos_turma=conn_tt.execute(sql)
%>
<% if rs_alunos_turma ("assunto") = rs_alunos_turma("id") then %>
<%= rs_assunto("assunto")%>
<% end if %>
<%
if not rs_alunos_turma.eof then
data_in = cdate("01/01/2300")
end if
do while not rs_alunos_turma.eof
%>
<%=rs_assunto("id")%>
' Instrução que recebe o clique do usuário e o leva ao artigo pretendido
<a href="Int_gan_artigos.asp?cod=<%=rs_assunto("id")%>">
<a href="Int_gan_artigos.asp?cod=<%=rs_alunos_turma("id")%>">
' Exibe o titulo do artigo
<%=rs_alunos_turma("titulo")%>
' Exibe o resumo do artigo
<%=rs_alunos_turma("resumo")%>
<%
data_in = rs_alunos_turma("data_inicio")
rs_alunos_turma.movenext
loop
%>
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.