[ vulin @ 24.01.2007. 17:10 ] @
Hoću da izbegnem opcije desnog klika za filtriranje podataka na formi, znači samo komandni dugmići dolaze u obzir. Elem, u pitanju je pretraga nekretnina i razmaženi kupac bira po sedam ili osam kriterijuma. Na formi je desetak što list, što kombo boksova, i svaki od njih treba da sužava pretragu. E, to mi je problem - sve radi, za svaki kriterijum ok, sem za dva koji su BETWEEN - AND . Znam da je tema bila, ali ako mi neko kaže kako da ovu bazu aploudujem - rado ću to i da uradim.
[ vulin @ 24.01.2007. 21:16 ] @
A ti upališ motorku.... Dosetio se i ja da prikačim bazu, eto je gore. Dakle, možda nisam bio dovoljno precizan u opisu problema, ali ko otvori ovu bazu videće Form2 koji savršeno radi pretragu po jednom kriterijumu, videće i Form3 koji lepo pretražuje sem CENA od - do. E, tu sam zakucao i treba mi pomoć: ovo je RecordSource Form3 :

SELECT tblNEKRETNINE.STATUS, tblNEKRETNINE.Šifra, tblNEKRETNINE.[VRSTA OBJEKTA], tblNEKRETNINE.[MESTO OBJEKTA], tblNEKRETNINE.[LOKACIJA OBJEKTA], tblNEKRETNINE.Površina, tblNEKRETNINE.Spratnost, tblNEKRETNINE.[Vrsta grejanja], tblNEKRETNINE.Telefon, tblNEKRETNINE.CENA, tblNEKRETNINE.TOP FROM tblNEKRETNINE WHERE (((tblNEKRETNINE.STATUS) Like "*"+Forms!Form3!PretragaSTATUS+"*" Or (tblNEKRETNINE.STATUS) Is Null) And ((tblNEKRETNINE.Šifra) Like "*"+Forms!Form3!PretragaŠifra+"*" Or (tblNEKRETNINE.Šifra) Is Null) And ((tblNEKRETNINE.[VRSTA OBJEKTA]) Like "*"+Forms!Form3!PretragaVO+"*" Or (tblNEKRETNINE.[VRSTA OBJEKTA]) Is Null) And ((tblNEKRETNINE.[MESTO OBJEKTA]) Like "*"+Forms!Form3!PretragaMO+"*" Or (tblNEKRETNINE.[MESTO OBJEKTA]) Is Null) And ((tblNEKRETNINE.[LOKACIJA OBJEKTA]) Like "*"+Forms!Form3!PretragaLO+"*" Or (tblNEKRETNINE.[LOKACIJA OBJEKTA]) Is Null) And ((tblNEKRETNINE.Površina) Like "*"+Forms!Form3!PretragaPovršina+"*" Or (tblNEKRETNINE.Površina) Is Null) And ((tblNEKRETNINE.Spratnost) Like "*"+Forms!Form3!PretragaSpratnost+"*" Or (tblNEKRETNINE.Spratnost) Is Null) And ((tblNEKRETNINE.[Vrsta grejanja]) Like "*"+Forms!Form3!PretragaVG+"*" Or (tblNEKRETNINE.[Vrsta grejanja]) Is Null) And ((tblNEKRETNINE.Telefon) Like "*"+Forms!Form3!PretragaTelefon+"*" Or (tblNEKRETNINE.Telefon) Is Null));

OK, sad vidim da pretragu po telefonu ( da li ima ili ne ) treba izbaciti, ali je poenta da ne mogu da izbunarim od - do. E, pa hajde moderatori - ima li meni pomoći ?
[ BiloKoje @ 25.01.2007. 06:05 ] @


Stavio sam u kriterijum za polje CENA u upitu :
>=[Forms]![Form3]![PretragaCENAod] And <=[Forms]![Form3]![PretragaCENAdo]
i radi. Valja još da za tekst box PretragaCENAod Default Value bude 0, a za PretragaCENAdo maksimalna cena iz tabele, tako će raditi i ako ne uneseš nikakav kriterijum.
[ vulin @ 25.01.2007. 07:28 ] @
Hvala BK. Ako stavim ovo što je dole - ni da bekne !!!

SELECT tblNEKRETNINE.STATUS, tblNEKRETNINE.Šifra, tblNEKRETNINE.[VRSTA OBJEKTA], tblNEKRETNINE.[MESTO OBJEKTA], tblNEKRETNINE.[LOKACIJA OBJEKTA], tblNEKRETNINE.Površina, tblNEKRETNINE.Spratnost, tblNEKRETNINE.[Vrsta grejanja], tblNEKRETNINE.Telefon, tblNEKRETNINE.CENA, tblNEKRETNINE.TOP FROM tblNEKRETNINE WHERE (((tblNEKRETNINE.STATUS) Like "*"+Forms!Form3!PretragaSTATUS+"*" Or (tblNEKRETNINE.STATUS) Is Null) And ((tblNEKRETNINE.Šifra) Like "*"+Forms!Form3!PretragaŠifra+"*" Or (tblNEKRETNINE.Šifra) Is Null) And ((tblNEKRETNINE.[VRSTA OBJEKTA]) Like "*"+Forms!Form3!PretragaVO+"*" Or (tblNEKRETNINE.[VRSTA OBJEKTA]) Is Null) And ((tblNEKRETNINE.[MESTO OBJEKTA]) Like "*"+Forms!Form3!PretragaMO+"*" Or (tblNEKRETNINE.[MESTO OBJEKTA]) Is Null) And ((tblNEKRETNINE.[LOKACIJA OBJEKTA]) Like "*"+Forms!Form3!PretragaLO+"*" Or (tblNEKRETNINE.[LOKACIJA OBJEKTA]) Is Null) And ((tblNEKRETNINE.Površina) Like "*"+Forms!Form3!PretragaPovršina+"*" Or (tblNEKRETNINE.Površina) Is Null) And ((tblNEKRETNINE.Spratnost) Like "*"+Forms!Form3!PretragaSpratnost+"*" Or (tblNEKRETNINE.Spratnost) Is Null) And ((tblNEKRETNINE.[Vrsta grejanja]) Like "*"+Forms!Form3!PretragaVG+"*" Or (tblNEKRETNINE.[Vrsta grejanja]) Is Null) And ((tblNEKRETNINE.Telefon) Like "*"+Forms!Form3!PretragaTelefon+"*" Or (tblNEKRETNINE.Telefon) Is Null) AND ((tblNEKRETNINE.CENA) >=[Forms]![Form3]![PretragaCENAod]) And ((tblNEKRETNINE.CENA) <=[Forms]![Form3]![PretragaCENAdo]));
[ vulin @ 25.01.2007. 07:43 ] @
SELECT tblNEKRETNINE.STATUS, tblNEKRETNINE.Šifra, tblNEKRETNINE.[VRSTA OBJEKTA],
tblNEKRETNINE.[MESTO OBJEKTA], tblNEKRETNINE.[LOKACIJA OBJEKTA], tblNEKRETNINE.Površina,
tblNEKRETNINE.Spratnost, tblNEKRETNINE.[Vrsta grejanja], tblNEKRETNINE.Telefon, tblNEKRETNINE.CENA,
tblNEKRETNINE.TOP FROM tblNEKRETNINE WHERE (((tblNEKRETNINE.STATUS) Like
"*"+Forms!Form3!PretragaSTATUS+"*" Or (tblNEKRETNINE.STATUS) Is Null) And ((tblNEKRETNINE.Šifra) Like
"*"+Forms!Form3!PretragaŠifra+"*" Or (tblNEKRETNINE.Šifra) Is Null) And ((tblNEKRETNINE.[VRSTA
OBJEKTA]) Like "*"+Forms!Form3!PretragaVO+"*" Or (tblNEKRETNINE.[VRSTA OBJEKTA]) Is Null) And
((tblNEKRETNINE.[MESTO OBJEKTA]) Like "*"+Forms!Form3!PretragaMO+"*" Or (tblNEKRETNINE.[MESTO
OBJEKTA]) Is Null) And ((tblNEKRETNINE.[LOKACIJA OBJEKTA]) Like "*"+Forms!Form3!PretragaLO+"*" Or
(tblNEKRETNINE.[LOKACIJA OBJEKTA]) Is Null) And ((tblNEKRETNINE.Površina) Like
"*"+Forms!Form3!PretragaPovršina+"*" Or (tblNEKRETNINE.Površina) Is Null) And ((tblNEKRETNINE.Spratnost)
Like "*"+Forms!Form3!PretragaSpratnost+"*" Or (tblNEKRETNINE.Spratnost) Is Null) And
((tblNEKRETNINE.[Vrsta grejanja]) Like "*"+Forms!Form3!PretragaVG+"*" Or (tblNEKRETNINE.[Vrsta grejanja])
Is Null) And ((tblNEKRETNINE.Telefon) Like "*"+Forms!Form3!PretragaTelefon+"*" Or (tblNEKRETNINE.Telefon)
Is Null) And ((tblNEKRETNINE.CENA)>=Forms!Form3!PretragaCENAod) And
(tblNEKRETNINE.CENA)<=Forms!Form3!PretragaCENAdo);

E - sad radi. BiloKoje, brate mili, hvala ti što si mi oči otvorio. Ako te put ikad nanese u SM, svaki put imaš piće i plavušu. Živ bio !
[ BiloKoje @ 25.01.2007. 07:46 ] @

Kod mene radi. Menjao sam Form3.
[ vulin @ 25.01.2007. 18:32 ] @
OK! Sve u svemu - radi. Hvala od srca.