WHERE BETWEEN ?? ERRO ??
O que significa esse campo "esta"??? O erro deve estar nele.
Melhor: faça a consulta sem esse campo "esta". Se rodar corretamente o erro está no campo "esta".
Talvez seja o formato da data. Antes de fazer a consulta SQL, faça o tratamento das datas:
Dim varInicial As Date
Dim varFinal As Date
varInicial = TxtInicio.Text
varInicial = CDate(varInicial)
varInicial = Format(varInicial, "mm/dd/yyyy")
varFinal = TxtFinal.Text
varFinal = CDate(varFinal)
varFinal = Format(varFinal, "mm/dd/yyyy")
Data.RecordSource = "Select * from qualificativa where inclusao >= #" & varInicial & "# And inclusao <= #" & varFinal & "# order by inclusao asc"
Data.Refresh
Melhor: faça a consulta sem esse campo "esta". Se rodar corretamente o erro está no campo "esta".
Talvez seja o formato da data. Antes de fazer a consulta SQL, faça o tratamento das datas:
Dim varInicial As Date
Dim varFinal As Date
varInicial = TxtInicio.Text
varInicial = CDate(varInicial)
varInicial = Format(varInicial, "mm/dd/yyyy")
varFinal = TxtFinal.Text
varFinal = CDate(varFinal)
varFinal = Format(varFinal, "mm/dd/yyyy")
Data.RecordSource = "Select * from qualificativa where inclusao >= #" & varInicial & "# And inclusao <= #" & varFinal & "# order by inclusao asc"
Data.Refresh
até assim não funciona!
não me mostra os registros do mes de janeiro!
Data.RecordSource = "Select * from qualificativa where inclusao between #01/01/2005# And #01/02/2005# order by inclusao asc"
agora se eu colocar assim funciona:
Data.RecordSource = "Select * from qualificativa where inclusao between #01/01/2005# And #30/01/2005# order by inclusao asc"
E agoara ?
Obrigado!
não me mostra os registros do mes de janeiro!
Data.RecordSource = "Select * from qualificativa where inclusao between #01/01/2005# And #01/02/2005# order by inclusao asc"
agora se eu colocar assim funciona:
Data.RecordSource = "Select * from qualificativa where inclusao between #01/01/2005# And #30/01/2005# order by inclusao asc"
E agoara ?
Obrigado!
Esse problema é tÃpico de formato de data, amigo.
Ops, esqueci de um detalhe ao formatar as datas: os colchetes. Veja agora se dá certo.
Dim varInicial As Date
Dim varFinal As Date
varInicial = TxtInicio.Text
varInicial = CDate(varInicial)
varInicial = Format([varInicial], "mm/dd/yyyy")
varFinal = TxtFinal.Text
varFinal = CDate(varFinal)
varFinal = Format([varFinal], "mm/dd/yyyy")
Data.RecordSource = "Select * from qualificativa where inclusao >= #" & varInicial & "# And inclusao <= #" & varFinal & "# order by inclusao asc"
Data.Refresh
Ops, esqueci de um detalhe ao formatar as datas: os colchetes. Veja agora se dá certo.
Dim varInicial As Date
Dim varFinal As Date
varInicial = TxtInicio.Text
varInicial = CDate(varInicial)
varInicial = Format([varInicial], "mm/dd/yyyy")
varFinal = TxtFinal.Text
varFinal = CDate(varFinal)
varFinal = Format([varFinal], "mm/dd/yyyy")
Data.RecordSource = "Select * from qualificativa where inclusao >= #" & varInicial & "# And inclusao <= #" & varFinal & "# order by inclusao asc"
Data.Refresh
eu estou invertendo, dd/mm/yyyy, tem alguma coisa a ver ?
se eu colocxar assim aparece as datas
Data.RecordSource = "Select * from qualificativa where inclusao >= #" & varInicial & "# order by inclusao asc"
daquele jeito não aparece ??? Estranho não ???
Data.RecordSource = "Select * from qualificativa where inclusao >= #" & varInicial & "# order by inclusao asc"
daquele jeito não aparece ??? Estranho não ???
qual a diferença, eu colocava dd/mm/yyyy e não funcionava
coloque mm/dd/yyyy e agora funcionou,
só que no meu windows esta: [txt-color=#ff0000]DD/MM/AAAA [/txt-color]?
alguem pode me explicar ????
coloque mm/dd/yyyy e agora funcionou,
só que no meu windows esta: [txt-color=#ff0000]DD/MM/AAAA [/txt-color]?
alguem pode me explicar ????
OBRIGADO A TODOS!!!!!!!!!!!
Tópico encerrado , respostas não são mais permitidas