Post Top Ad

Post Top Ad

pencarian database ms access berdasarkan tanggal delphi 7



ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT Tanggal, Jam, Volt_R,Volt_S,Volt_T, Amp_R, Amp_S,Amp_T  FROM data WHERE Tanggal BETWEEN (:tgl1) AND (:tgl2) ORDER BY tanggal');
ADOQuery1.Parameters.ParamByName('tgl1').Value:=FormatDateTime('dd/mm/yyyy',DateTimePicker1.Date);
ADOQuery1.Parameters.ParamByName('tgl2').Value:=FormatDateTime('dd/mm/yyyy',DateTimePicker2.Date);
ADOQuery1.Open;