Fórum Consulta entre datas com filtro(SQL) #214078

14/02/2004

0

Galera estou precisando de um grande favor.
Preciso de uma função em SQL para localizar registros entre um dado periodo e especificando o valor de um campo da tabela.

Query1.Close;
Query1.ParamByName(´inicio´).Asdate := strtodate(MaskEdit1.text);
Query1.ParamByName(´termino´).Asdate := strtodate(MaskEdit2.text);
Query1.Open;

Essa função me dá todos os registro. Certo?
O q devo fz pra complementar essa rotina?

Valeu galera!


Denysk

Denysk

Responder

Posts

14/02/2004

Aroldo Zanela

Colega,

Coloca o script SQL pra gente analisar.


Responder

Gostei + 0

14/02/2004

Marco Salles

Amigo Insire Num Form DoisMaskEdit, Um DbGrid, Um DataSource, Um Query... Link O DataSource No Query, o DbGrid No DataSoyrce, e Na Propiedade DataBase Name Do Query Coloque O Nome Do Aliase Ou Caminho Onde Esta a Tabela Que Voce Quer Condultar. Na Propiedade Sql Do Query1 Insira as Seguintes Linhas De Comando: Select *From NOMEDASUATABELA...Por Fim Na Propiedade Active Do Query1 Selecione a Opção True e Veja o Que Acontece. Se Nada Acontecer Passamos Para a Etapa 2
Vamos ao Código...Num Evento Qualquer(Desde Que o Valor De MaskEdit1 e MaskEdit2 Estejam Devidamentes Selecionados e Corretos) Escreva:

Begin
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add(´Select *From NOMEDASUATABELA´);
Query1.Sql.Add(´Where SEUCAMPODATA >= :Inicio´);
Query1.ParamByName(´inicio´).Asdate := strtodate(MaskEdit1.text);
Query1.Sql.Add(´And SEUCAMPODATA <= :termino´);
Query1.ParamByName(´termino´).Asdate := strtodate(MaskEdit2.text);
Query1.Prepare;
Query1.Open;
End;

P:s Não Esqueça De Colocar Valores Corretos No MaskEdit


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar