Ir para conteúdo
Fórum Script Brasil
  • 0

Data Expira !


Cybertrax

Pergunta

GALERA É SIMPLES MAS TA DIFICIL VIU ...

TO QUERENDO QUE MEUS EVENTOS (FESTAS) EXPIRAM DEPOIS QUE PASSAR ELA AUTOMATICAMENTE...

POR EXEMPLO TENHO UMA DEFAULT.ASP QUE MOSTRA AS PRÓXIMAS 10 FESTAS DAI ELE RESTRINGE NA OPÇÃO " ... SELECT TOP 10 *..., DAI QUERO RESTRINGIR PARA QUE MOSTRA APENAS EVENTOS (DATAS) QUE SEJA IGUAL OU MAIOR DO QUE HOJE (a data atual)

OIA CÓDIGO:

******************************************************

<% id = request.querystring("id")

sqlstmt = "SELECT * FROM noticias where id =" & id & " ORDER BY id DESC"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open sqlstmt, Dados, 3, 3

TotalRecs = rs.recordcount

date1 = rs("data")

id = rs("ID")

name1 = rs("titulo")

p1= rs("materia")

description = p1 %>

********************************************************

AJUDA AE GALERA .. PLEASE !!

Link para o comentário
Compartilhar em outros sites

5 respostass a esta questão

Posts Recomendados

  • 0

porque você não faz assim!

Para Listas as 10 ultimas q ainda vao acontecer!

Dim Hoje
Hoje = Date
sql = "select top 10 * from Festas where DataFesta >= '"& Hoje &"'"
Set RS = Conexao.Execute(sql)
While not RS.eof
#lista todos eles#
RS.movenext
wend
no html o link para a festa! <a href="festa.asp?id=<%=RS("id")%>">Festa dia <%=RS("DataFesta")</a> no pagina festa.asp(mostra os detalhes da festa)
id = request.querystring("id")
sqlstmt = "SELECT * FROM Festas where id ="&id 
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, Dados, 3, 3
date1 = rs("data")
id = rs("ID")
name1 = rs("titulo")
p1= rs("materia")
description = p1

espero ter ajudade ae!

Link para o comentário
Compartilhar em outros sites

  • 0

Mas tipo eu como esta no meu código , eu quero que só mostre os EVENTOS (DATAS) QUE SEJA IGUAL OU MAIOR DO QUE HOJE (a data atual)....

Desculpe mas continuo não entendendo, pois deveria ser alterado aqui né? "SELECT * FROM noticias where id =" & id & " ORDER BY id DESC" ???

alguém explique mais detalhado de possivél !!

******************************************************

<% id = request.querystring("id")

sqlstmt = "SELECT * FROM noticias where id =" & id & " ORDER BY id DESC"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open sqlstmt, Dados, 3, 3

TotalRecs = rs.recordcount

date1 = rs("data")

id = rs("ID")

name1 = rs("titulo")

p1= rs("materia")

description = p1 %>

****************************************************

Link para o comentário
Compartilhar em outros sites

  • 0

faz como o DELPHI-Man32 falou:

Seu código:

<%

Dim Hoje

id = request.querystring("id")

Hoje = Date

sqlstmt = "SELECT * FROM noticias where data >= " & Hoje & " ORDER BY id DESC"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open sqlstmt, Dados, 3, 3

TotalRecs = rs.recordcount

date1 = rs("data")

id = rs("ID")

name1 = rs("titulo")

p1= rs("materia")

description = p1

%>

neste caso ele não busca noticias antigas.

abraços

Link para o comentário
Compartilhar em outros sites

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,4k
×
×
  • Criar Novo...