Exibir registros apenas após certa data...

[viniciusjau 2]

E ai pessoal..

Estou tentando exibir registros do meu banco MySql mas apeas os que foram cadastrados há + de dez dias...

Alguém pod eme dar uma dica de como montar essa query ??

[hinom 5]

na query sql, faça algo assim

WHERE 

data_cadastro > DATE_SUB( NOW, "10 Days" )

[viniciusjau 2]

cara tentei de um monte de forma aqui mas não deu certo com esse DATE_SUB

 

SELECT campos WHERE data > DATE_SUB('2008-09-01',INTERVAL 5 DAY)

 

será que é porque meu campo é do tipo timestamp ??

[Marcio Leandro 0]

Movido: PHP=>MySQL

[viniciusjau 2]

Consegui resovler fazendo assim:

SELECT campos FROM tabela WHERE data < DATE_SUB(NOW(), INTERVAL 10 day)

 

porém agora eu queria fazer uma query pegando os registro até os 10 dias ...

algéum tem alguma sugestão ?

[alissong 1]

Viniciusjau,

 

 

Uso isso para consultar em intervalo de datas: Veja o código em visual basic 06, mas você for transpormá-lo em php. Poste o código completo, pois estou tentando aprender essa linguagem de programação:

Private Sub cmdprocurar_Click()

Dim Inicial As String

Dim Final As String

 

On Error GoTo cmdprocurar ' Inicia o tratamento de erro

 

If data_inicial.Value > data_final.Value Then

MsgBox "A data inicial deverá ser igual ou menor que a final !", vbInformation, "Data Inválida"

Exit Sub

End If

Inicial = Format(data_inicial.Value, "YYYY/mm/dd")

Final = Format(data_final.Value, "YYYY/mm/dd")

 

If AdoPeriodo.State = 1 Then Set AdoPeriodo = Nothing

sql = "SELECT empenho.n_empenho,empenho.data_empenho,empenho.tipo_empenho,empenho.modalidade,e

mpenho.inciso,empenho.processo,empenho.valor_empenho,empenho.cod_fornecedor,forne

cedor.nome_empresa"

sql = sql & " FROM empenho, fornecedor"

sql = sql & " WHERE empenho.cod_fornecedor = fornecedor.cod_fornecedor and data_empenho BETWEEN '" & Inicial & "' AND '" & Final & "'"

sql = sql & " ORDER BY empenho.n_empenho,empenho.data_empenho"

 

AdoPeriodo.Open sql, gconexao, adOpenKeyset, adLockOptimistic

With AdoPeriodo

If .RecordCount > 0 Then

'Limpa o cabeçalho

ListViewPeriodo.ListItems.Clear

Call ListaPeriodo

txttotal.Text = (Format((ComputeAmount), "currency"))

 

Else

MsgBox "Não há transações para este intervalo de datas. Tente Novamente", vbInformation

Exit Sub

End If

.Close

End With

gUltHora = Now

 

On Error GoTo 0

cmdprocurar_exit:

Exit Sub

 

cmdprocurar:

MsgBox Err.Description, vbExclamation, "Erro em [cmdprocurar]"

 

End Sub

Um abraço.

 

 

Alissong

[hinom 5]

nao seria a mesma query ?