COMPARAR DATAS COM SQL

USUARIO.EXCLUIDOS 07/08/2007 21:06:13
#229906
Pessoal..... eu estou com um problema aqui em um relatório, tenho que fazer o seguinte!

Tenho uma tabela no Access chamada pagamento, com campos NOME(texto), DATA1(date/time), e PAGO1(Texto).... Como eu faço para comparar essa DATA1 se ela for menor que a do sistema, quando o campo PAGO1 for igual a "N"........

MUITO OBRIGADO!!!!!!!
ICEMAN 07/08/2007 21:14:17
#229909 

dim minhadata as string

minhadata=format(now,"mm/dd/yyyy")

rs.open "select * from tabela where data1 <= '" & minhadata & "' and pago1='N' order by data1"


caso nao de certo faça assim

dim minhadata as string

minhadata=format(now,"dd/mm/yyyy")

rs.open "select * from tabela where data1 <= '" & minhadata & "' and pago1='N' order by data1"


espero que te ajude
USUARIO.EXCLUIDOS 08/08/2007 10:27:55
#229942
Melhorando a sugestão do ICEMAN (favor pontuar o ICEMAN porque o seu problema já está resolvido).

dim minhadata as string

minhadata=format(now,"mm/dd/yyyy")

rs.open "select * from tabela where ((#" & format(data1, "mm/dd/yyyy") & "# <= #" & _
format(minhadata, "mm/dd/yyyy & "#) and pago1='N') order by data1"
USUARIO.EXCLUIDOS 09/08/2007 17:35:30
#230295
Não está dando certo, está dando esse erro aqui

"Data type mismacht in criteria expression"

Do jeito do RobertoMarques está acusando esse caractere aqui que coloquei em negrito...

rs.open "select * from tabela where ((#" & format(data1, "mm/dd/yyyy") & "# <= #" & _
format(minhadata, "mm/dd/yyyy & "#) and pago1='N') order by data1"

Obrigado!
LCSD 09/08/2007 17:50:29
#230304
CORRIGINDO novamente....



dim minhadata as datetime
'PARA SQL SERVER
minhadata=format(now,"mm/dd/yyyy")

rs.open "select * from tabela where data1 <= '" & minhadata & "' and pago1='N' order by data1"
'PARA ACCESS
minhadata=format(now,"dd/mm/yyyy")

rs.open "select * from tabela where data1 <= #" & minhadata & "# and pago1='N' order by data1"
USUARIO.EXCLUIDOS 12/08/2007 01:28:32
#230543
Pessoal não está dando certo porque tenho 3 registros aqui e um está com a data1 maior que a do sistema ele está jogando esse registro!!!!

O que será que está acontecendo???

Obrigado!!!
USUARIO.EXCLUIDOS 12/08/2007 03:41:18
#230547
Vejam o Projeto....... é só um exemplo do que estou tentando fazer!!!!

Não sei porque não está dando certo, mais se vocês puderem olhar o Projeto e me da uma Força, fica muito GRATO


Obrigado
USUARIO.EXCLUIDOS 12/08/2007 10:21:49
#230553 Resposta escolhida
Alexandre, o amigo LCSD se enganou.

Para a consulta selecionar os registro corretos, vc precisa formatar a data no access desta forma:

minhaData = Format(Date,"MM/DD/YYYY"), e nao como "DD/MM/YYYY", fora isso, ta td certinho =)

Testei aqui em casa e deu td certo, segue o projeto com a correcao.

Abraços a todos.
USUARIO.EXCLUIDOS 12/08/2007 16:51:19
#230579
AAAAAOOOOOoooooooooooooooo bem observado vocês desse FORUM são de uma eficiencia Gigastesca heim......

Agora não sei mais quem vou pontuar.......Me desculpe ai se eu não pontuarei um ou outro BLZ


OBRIGADÍSSIMO pela FORÇA...........

é bom saber que ainda existe pessoas que estão dispostas a ajudar mesmo recebendo pouco ou nada em troca....

VALEU mesmo!!!!!
Tópico encerrado , respostas não são mais permitidas
Voltar