[ mica99 @ 26.05.2012. 07:41 ] @
Napravio sam drugarici program za pracenje rezervacije u njenoj turistickoj agenciji. Ona mi je trazila jos jedan filter tj. da moze da izfiltrira sve putnike koji putuju u naredna xx dana. Baza je radjena u delphi (access). Upit sam postavio ovako : procedure TFrmListaRez.Button1Click(Sender: TObject); begin if brdana.Text = '' then brdana.Text:='0'; with qu do begin close; sql.Text:='SELECT aranzmani.datum_polaska, aranzmani.organizator, rezervacije.imeputnika, aranzmani.destinacija, aranzmani.smestaj,'+ 'rezervacije.mob, aranzmani.datum_odlaska, aranzmani.vrsta_prevoza FROM aranzmani INNER JOIN rezervacije ON aranzmani.ArID = rezervacije.ArID'+ ' WHERE ((aranzmani.datum_polaska)<=DateAdd("d",'+brdana.Text+',Date()))'; Open; TDateField(FieldByName('datum_polaska')).DisplayFormat:='dd.mm.yyyy'; end; end; Molim za pomoc |