Novato Em Asp

[Edson]

Olá a todos...

Sou um novato em asp e estou com um pequeno problema:

Fiz um select em um banco de dados e só tenho o retorno da primeira linha gravada na tabela. Criei um campo "Ordem" na tabela mas mesmo dando um ORDER BY não funciona. O que será que está acontecendo?

Abraços

[dark0]

Brother !!

Poste seu codigo!

[Edson]

Ok... aí vai...

Set RS01 = Conn.Execute ("SELECT * FROM modulo_Agenda ORDER BY agendaOrdem")

If not (RS01.Bof and RS01.Eof) then

vAgendaBandeira = RS01("agendaBandeira")

vAgendaDataDe = RS01("agendaDataDe")

vAgendaDataAte = RS01("agendaDataAte")

vAgendaEvento = RS01("agendaEvento")

vAgendaUrl = RS01("agendaUrl")

End if

Set RS01 = Nothing

[Guest Guest]

Set RS01 = Conn.Execute ("SELECT * FROM modulo_Agenda ORDER BY agendaOrdem")

If not (RS01.Bof and RS01.Eof) then

vAgendaBandeira = RS01("agendaBandeira")

vAgendaDataDe = RS01("agendaDataDe")

vAgendaDataAte = RS01("agendaDataAte")

vAgendaEvento = RS01("agendaEvento")

vAgendaUrl = RS01("agendaUrl")

End if

Set RS01 = Nothing

Cara isso é simples , só está mostrando o 1º registro porque você não criou um loop para mostrar todos os registros, entaum o q fiz retirei aquele seu if lá em cima e troquei por um while , que enquanto não chegar ao fim dos registros da tabela vai listando na tela...

As mudanças estaum em vermelho

Set RS01 = Conn.Execute ("SELECT * FROM modulo_Agenda ORDER BY agendaOrdem")

While not RS01.EOF

vAgendaBandeira = RS01("agendaBandeira")

vAgendaDataDe = RS01("agendaDataDe")

vAgendaDataAte = RS01("agendaDataAte")

vAgendaEvento = RS01("agendaEvento")

vAgendaUrl = RS01("agendaUrl")

RS01.MoveNext

Wend

Set RS01 = Nothing

[Edson]

Valeu pelo toque!

Mas sua alteração só me mostra o último registro do banco... existe alguma forma de carregar as variáveis para mostrar todas as linhas da tabela?

Abraços

[ViniciusJau]

Valeu pelo toque!

Mas sua alteração só me mostra o último registro do banco... existe alguma forma de carregar as variáveis para mostrar todas as linhas da tabela?

Abraços

deve está faltando o loop

[Guest Guest]

cara você não precisa armazenar em variaveis para mostrar , mostra direto assim, ou então cria isso dentro do html pra montar a tabela direito..

While not RS01.EOF

Response.Write RS01("agendaBandeira") & "<br>"

Response.Write RS01("agendaDataDe") & "<br>"

Response.Write RS01("agendaDataAte") & "<br>"

Response.Write RS01("agendaEvento") & "<br>"

Response.Write RS01("agendaUrl") & "<br>"

RS01.MoveNext

Wend

porque se você quiser armazenar em variavel vai ter q quebrar em array depois só vai dar mais trabalho...

[Edson]

Com as alterações meu código ficou assim, mas ainda só me mostra a última linha da tabela:

Set RS01 = Conn.Execute ("SELECT * FROM modulo_Agenda")

do while not RS01.EOF

vAgendaBandeira = RS01("agendaBandeira")

vAgendaDataDe = RS01("agendaDataDe")

vAgendaDataAte = RS01("agendaDataAte")

vAgendaEvento = RS01("agendaEvento")

vAgendaUrl = RS01("agendaUrl")

RS01.MoveNext

loop

Wend

Set RS01 = Nothing

[Guest Guest]

Cara não armazena em variavel q nem você fez assim:

Set RS01 = Conn.Execute ("SELECT * FROM modulo_Agenda")

do while not RS01.EOF

vAgendaBandeira = RS01("agendaBandeira")

vAgendaDataDe = RS01("agendaDataDe")

vAgendaDataAte = RS01("agendaDataAte")

vAgendaEvento = RS01("agendaEvento")

vAgendaUrl = RS01("agendaUrl")

RS01.MoveNext

loop

Wend

Set RS01 = Nothing

'Lista direto desse jeito

while not RS01.EOF

Response.Write RS01("agendaBandeira") & "<br>"

Response.Write RS01("agendaDataDe") & "<br>"

Response.Write RS01("agendaDataAte") & "<br>"

Response.Write RS01("agendaEvento") & "<br>"

Response.Write RS01("agendaUrl") & "<br>"

RS01.MoveNext

Wend

Set RS01 = Nothing

[Edson]

Certo... valeu pela ajuda

Como mencionei no titulo do tópico, sou um iniciante em asp. Espero que possa contar com os usuários deste site para tirar minhas dúvidas... e futuramente contribuir com ele também.

Abraços

Edson

[dark0]

Esse é o espírito de um bom fórum, hehehe

Primeiro você aprende, e depois volta para ensinar os 'professores', hehehe

Resolveu sua duvida?

Até mais

[Edson]

Resolvi em partes, vou explicar o que preciso:

Criei um módulo onde cadastro alguns eventos na tabela, quero que apareça na página somente as 4 mais recentes em um espaço de 15 dias, caso não haja eventos nestas condições aparecerão os 4 com datas mais recentes.

Acho que deu para perceber que ainda estou no começo da meada.... Estou procurando um meio para fazer isso funcionar... Só que estou como cego em tiroteio.

Agradeço desde já pela ajuda...

[cyberalexxx]

Pra fazer o q você quer voce vai precisar se aprofundar mais em SQL, voce tera que usar Select Top, where e order by

pegue uma apostila para estudar:

http://www.sqlmagazine.com.br/apostilas.asp

[Edson]

Quanto ao SQL não tenho tantas dificuldades como com o ASP... é só me indicar o caminho e eu corro atrás...

[cyberalexxx]

mais isso que voce quer é basicamente sql

pegar os ultimos 5 registros (select top 5)

dos ultimos 15 dias (where data between "00/00/00" and "00/00/00")

em ordem de data (order by)