|
Postada em 17/01/2011 12:04 hs
Fala feras ai olha eu de novo perturbando, pessoal eu tenho o seguinte problema "que já esta me deixando com muita raiva". eu tenho o seguinte código
Estou utilizando o objeto (DTPicker) "Uma combobox que mostra um calendário!"
'PRIMEIRA COISA PONHO A DATA DE PESQUISA DENTRO DA VARIAVEL DAT_PESQUISA DAT_PESQUISA = CDate(DTPicker.Value)
'PONHO NA VARIAVEL O QUE EU QUERO SE SEJA PESQUISADO PARA O RELATÓRIO
SQL = "SELECT CADASTRO_ALUNOS.matricula, CADASTRO_ALUNOS.nome, CONTATO_ALUNO.telefone1, CONTATO_ALUNO.telefone2, CHAMADA.data_chamada, CHAMADA.situacao FROM (CADASTRO_ALUNOS INNER JOIN CONTATO_ALUNO ON CADASTRO_ALUNOS.[matricula] = CONTATO_ALUNO.[matricula_aluno]) INNER JOIN CHAMADA ON CADASTRO_ALUNOS.[matricula] = CHAMADA.[matricula_aluno] WHERE CHAMADA.data_chamada=#" & Format(DAT_PESQUISA, "dd/mm/yyyy") & "# AND CHAMADA.situacao='FALTOU' ORDER BY CADASTRO_ALUNOS.nome"
RS.Open SQL, conexao
'Ai eu faço o seguinte
if RS.EOF = true then msgbox "Nenhum registro encontrado!"VbInformation + vbOkonly, "AVISO" exit sub end if
Só que acontece o seguinte, quando eu pesquiso a data de HOJE, funciona uma BELEZA, só que se eu pesquisar uma data ANTERIOR, o RS não acha nada!!!!!
Estou ficando doido com isso. Me de uma força ai pessoal! Jesus abençoe aquele que de bom grado me ajudar!
|
|
|
|
|
Postada em 17/01/2011 12:22 hs
O campo datachamada esta gravando no banco como data geral ou data short. ? se for data con hora vc formata no sql:
left(CHAMADA.data_chamada,10)=#" & Format(DAT_PESQUISA, "dd/mm/yyyy") & "#
|
|
|
comendador
não registrado
|
|
Postada em 17/01/2011 13:30 hs
Meu brother quando criei o bd eu configurei o campo data_chamada para data abreviada, está salvando como tal, mesmo assim não busca datas posteriores.
|
|
|
comendador
não registrado
|
|
Postada em 17/01/2011 13:32 hs
Tanto que se eu chamar a data atual, ele traz todos os registros, só os registros anteriores, que não localiza nada!
|
|
|
|
Postada em 19/01/2011 09:48 hs
Eu uso assim: left(CHAMADA.data_chamada,10)=#" & Format(DAT_PESQUISA, "yyyy-mm-dd") & "00:00:00#" Funciona sem problemas.
|
|
|
|
Postada em 19/01/2011 11:06 hs
Ai Juan obrigado mesmo pela sua ajuda, pois isso já me deixou bem frustrado! Vou utilizar e se funcionar eu te informo ok. Obrigado!
|
|
|