[es] - Opet SQL problemcina u Delphiju

MatezYU

Član broj: 4114
Poruke: 1586
*.adanet.co.yu.

+17 Profil

^{25.03.2006. u 05:58 - pre 219 meseci}

Dakle ovako, radim izvestaj i u izvestaju postoje gomile opcija za filtriranje...
Dakle na jednom mestu unesem datum i posle toga biram da li zelim da vidim pacijente kod jednog lekara, kod drugog lekara ili nesto trece. Tih filtera ima 6 komada ukupno... Ovako sam poceo da radim i ono prvo mi je ok, tj. po datumu dobro sortira ali kada treba da se izabere korisnik ili vrsta pregleda nece... U cemu gresim?
I kako mogu da odradim da kada unesem neki nepostojeci datum, recimo 31.02 ili tako nesto da mi ne pukne program nego da izbaci poruku o gresci da ne postoji takav datum?
Hvala

query1.sql.Clear;
query1.SQL.Add('SELECT pacijenti.*, nalazi.* FROM nalazi LEFT JOIN pacijenti ON nalazi.JMBG = pacijenti.JMBG WHERE (Datum BETWEEN' + QuotedStr(maskEdit1.Text) + ' AND ' + QuotedStr(maskedit2.Text) + ')');

if combobox1.ItemIndex=0 then
begin
end else query1.SQL.add(' AND (nalazi.Vrsta LIKE "'+combobox1.Text+'")');

if combobox2.ItemIndex=0 then
begin
end else query1.SQL.add(' AND (nalazi.Korisnik LIKE "'+combobox1.Text+'")');

Odgovor na temu

Milos D
Beograd

Član broj: 5621
Poruke: 280
*.adsl.sezampro.yu.

+1 Profil

Re: Opet SQL problemcina u Delphiju

^{25.03.2006. u 10:40 - pre 219 meseci}

Koristi TDateTimePicker da ne moras da brines o ispravnosti datuma.

Za poslednji SQL uslov koristis combobox1.Text umesto combobox2.Text

Odgovor na temu

sasas
Saša Slavnić
radim za neke švabe

Član broj: 35478
Poruke: 617
195.246.3.*

Profil

Re: Opet SQL problemcina u Delphiju

^{25.03.2006. u 10:44 - pre 219 meseci}

Pokušaj

Code:

query1.SQL.add(' AND (nalazi.Vrsta LIKE "'+combobox1.Text+'")');

zameniti sa

Code:

query1.SQL.add(' AND (nalazi.Vrsta = '''+combobox1.Text+''')');

tj.

Code:

query1.SQL.add(' AND (nalazi.Vrsta = '+ QuotedStr(combobox1.Text) +')');

Obrati pažnju na navodnike (single quotes vs double quotes).

ss.

When something is hard to do, then it's not worth doing.

Odgovor na temu