WHERE WHERE ??
posso usar where 2 vezes ?
Data.RecordSource = "Select * from qualificativa where esta='SIM' where inclusao between#" & inicial & "# And #" & final & "#order by inclusao asc"
Data.Refresh
Obrigado ?
Data.RecordSource = "Select * from qualificativa where esta='SIM' where inclusao between#" & inicial & "# And #" & final & "#order by inclusao asc"
Data.Refresh
Obrigado ?
não...
vc tem que utilizar apenas um WHERE, e ir adicionando condições com AND ou OR
vc tem que utilizar apenas um WHERE, e ir adicionando condições com AND ou OR
qual a melhor forma de corrigir isto ?
Data.RecordSource = "Select * from qualificativa where esta='SIM' where inclusao between#" & inicial & "# And #" & final & "#order by inclusao asc"
Obrigado!
Data.RecordSource = "Select * from qualificativa where esta='SIM' where inclusao between#" & inicial & "# And #" & final & "#order by inclusao asc"
Obrigado!
Data.RecordSource = "Select * from qualificativa where esta='SIM' AND inclusao between #" & inicial & "# And #" & final & "#order by inclusao asc"
apenas corrigindo o amigo Fábio Rocha, insira um espaço entre # e ORDER BY
olhe esta data ?
01/01/2005 Ã Â 01/02/2005
não mostra nenhum registro!
mas tem dados cadastrados,
se eu digito:
01/01/2005 Ã Â 30/01/2005 me mostra os dados
01/01/2005 Ã Â 01/02/2005
não mostra nenhum registro!
mas tem dados cadastrados,
se eu digito:
01/01/2005 Ã Â 30/01/2005 me mostra os dados
Com certeza é 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 esta= 'SIM' and inclusao between #" & varInicial & "# And #" & varFinal & "# order by inclusao asc"
Data.Refresh
Ps: e depois verifique o formato de data do WIndows: Painel de Controle / Configurações Regionais / Data. O formato deve estar: "dd/mm/yyyy".
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 esta= 'SIM' and inclusao between #" & varInicial & "# And #" & varFinal & "# order by inclusao asc"
Data.Refresh
Ps: e depois verifique o formato de data do WIndows: Painel de Controle / Configurações Regionais / Data. O formato deve estar: "dd/mm/yyyy".
o windows não aceita o formato (dd/mm/yyyy)
Como não aceita? Qual é o seu WIndows?
windows XP !
Windows XP
só consigo colocar dd/mm/aaaa
Obrigado!
só consigo colocar dd/mm/aaaa
Obrigado!
Tópico encerrado , respostas não são mais permitidas