Edson

Olá pessoal, Preciso usar um componente somente para receber mensagens. Estou testando estes dois só que não estou conseguindo o resultado que quero. Já vefiriquei em meu servidor e com eles está tudo ok. Quando clico em enviar no meu formulário aparece o seguinte erro: Objeto Server erro 'ASP 0177 : 800401f3' Falha em Server.CreateObject /modulos/modulo_consultas.inc.asp, line 154 800401f3 alguém pode me ajudar? []'s

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

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...

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

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

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

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

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