Fórum pesquisa entre datas, ajuda #170476
21/07/2003
0
qryVerPeriodo.close;
qryVerPeriodo.open;
if qryVerPeriodo.Locate(´Num_apto´, dm.tblDisponNum_apto.Value, []) and
(qryVerPeriodoData_res.Value = dm.tblDisponData_res.Value) then
begin
qryVerPeriodo.Params[0].Value := StrToDate(edtData.Text);
qryVerPeriodo.Params[1].Value := StrToDate(edtPrevSaida.Text);
end;
Application.MessageBox(´O apartamento já encontra-se reservado ´+
#13 + ´para este período!´,´Aviso´,
MB_ICONWARNING + MB_OK);
edtApto.SetFocus;
end;
Muito obrigado, Marcelo.
Marcrv2
Curtir tópico
+ 0Posts
21/07/2003
Marcelo.c
Coloque o código SQL inserido na query pra gente dar uma olhada.
Gostei + 0
21/07/2003
Marcrv2
Select * From Reserva
Where Data_Res between :DataI and :DataF
Marcelo
Gostei + 0
23/07/2003
Marcelo.c
qryVerPeriodo.Params[0].Value := FormatDateTime(´mm/dd/yyyy´,StrToDate(edtData.Text));
qryVerPeriodo.Params[1].Value := FormatDateTime(´mm/dd/yyyy´,StrToDate(edtPrevSaida.Text));
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)