dex 14.02.2013 15:43
Predmet:Re: Pretraživanje sa više kriterija

Evo i primer
Prilozi:
db4.zip (Velicina datoteke:10.94 KB)

miro35 14.02.2013 16:25
Predmet:Re: Pretraživanje sa više kriterija

to je to puno si mi pomogao.Hvala ti. Sad ću joÅ¡ trebat napisat u istom query-iju za joÅ¡ jednu kolonu koja se zove SumarRazduzenje.PokuÅ¡avam da naprevim pretragu sve u jednoj formi nadam se da ću uspjeti.Jer radi se o tabelama koje imaju viÅ¡e od 200.000 i viÅ¡e record-a.Inače ja filtriram podatke u ovom query-iju na change nekog polja evo i code:
PreuzmiIzvorni kôd (Text):
  1. Private Sub TRSumarIme_Change()
  2. Dim vSearchString As String
  3.  
  4.     vSearchString = TRSumarIme.Text
  5.     txtSearchZaduzenjeSumar.Value = vSearchString
  6.     Me.List0.Requery
  7.     If (Me.txtSearchZaduzenjeSumar = "") Then
  8.     Me.txtSearchZaduzenjeSumar = Null
  9.     Me.List0.Requery
  10.     End If
  11. End Sub
Hvala Gjoreski ovo tvoje rješenje bi bilo jednostavnije ali nije mi baš radilo dobro

miro35 15.02.2013 11:21
Predmet:Re: Pretraživanje sa više kriterija

Napisao sam za dva polja u formi:

SELECT tblPlocice.Boja, tblPlocice.Broj, tblPlocice.UlazBr, tblPlocice.DatumUlaza, tblPlocice.BrojZaduzenja, tblPlocice.DatumZaduzenja, tblPlocice.SumarZaduzenja, tblPlocice.SumarImeZaduzenja, tblPlocice.PovratBroj, tblPlocice.DatumPovrata, tblPlocice.SumarPovrata, tblPlocice.SumarImePovrata, tblPlocice.RazlogPovrata, tblPlocice.Status
FROM tblPlocice
WHERE (((tblPlocice.SumarImeZaduzenja) Like "*" & [Forms]![frmStatistikaProba]![txtSearchZaduzenjeSumar] & "*") AND ((tblPlocice.SumarImePovrata) Like "*" & [Forms]![frmStatistikaProba]![txtSearchRazduzenjeSumar] & "*")) OR (((IsNull([Forms]![frmStatistikaProba]![txtSearchZaduzenjeSumar]))<>False) AND ((IsNull([Forms]![frmStatistikaProba]![txtSearchRazduzenjeSumar]))<>False));

Ali ne radi kako treba.Podatke filtrira kad u obe kolone u tabeli postoje podaci.Ako u jednoj nema podataka onda ne filtrira ovu prvu

dex 15.02.2013 13:30
Predmet:Re: Pretraživanje sa više kriterija

Ponovo zagrade, odnosno redosled obavljanja operacija

SELECT tblPlocice.Boja, tblPlocice.Broj, tblPlocice.UlazBr, tblPlocice.DatumUlaza, tblPlocice.BrojZaduzenja, tblPlocice.DatumZaduzenja, tblPlocice.SumarZaduzenja, tblPlocice.SumarImeZaduzenja, tblPlocice.PovratBroj, tblPlocice.DatumPovrata, tblPlocice.SumarPovrata, tblPlocice.SumarImePovrata, tblPlocice.RazlogPovrata, tblPlocice.Status
FROM tblPlocice
WHERE ((SumarImeZaduzenja Like "*" & [Forms]![frmStatistikaProba]![txtSearchZaduzenjeSumar] & "*") OR IsNull([Forms]![frmStatistikaProba]![txtSearchZaduzenjeSumar))
AND ((SumarImePovrata Like "*" & [Forms]![frmStatistikaProba]![txtSearchRazduzenjeSumar] & "*" )
OR IsNull([Forms]![frmStatistikaProba]![txtSearchRazduzenjeSumar));

dex 15.02.2013 13:41
Predmet:Re: Pretraživanje sa više kriterija

Nekoliko primera forme za pretrazivanje imas ovde

http://www.elitesecurity.org/...-box-query

miro35 16.02.2013 10:03
Predmet:Re: Pretraživanje sa više kriterija

Isprobao sam radi sad sve.U pravu si sve je u zagradama jer kad sam ja dodavao drugo polje za pretragu nisam pazio na to.Hvala

zxz 16.02.2013 13:07
Predmet:Re: Pretraživanje sa više kriterija

Nisam se u pocetku htio ukljuciti jer mi bas i nije bilo jasno kakva pretraga se trazi.
Zelim se zahvaliti dexxxl-u na nesebicnoj pomoci.

Sada kad sam cini mi se i razumio o cemu se radi htio sam dati i neko svoje misljenje.

Kako sam ja razumio radi se o pretragi po koloni u kojoj je dozvoljena null vrijednost upolju.

Definicija null vrijednosti:
Pod pojmom null vrijednosti se podrazumijeva vrijednost koja u datom momentu za odredjeni atribut nije pozata.
Null vrijednost se razlikuje od praznog znakovnog niza (stringa) ili od znakovnog niza koji se sastoji samo od blank (" ") karaktera, ili od broja 0 , ili od bilo kojeg drugog broja.
Null vrijednost je mozda naj kontraverzniji aspekt relacijskog modela podataka.

Null vrijednost nije dobra pogotovo u poljima koja su formatirana kao string jer nije oučljiva.
Ukoliko bas treba odnosno da operateru nisu uvijek dostupni podaci koje bi trebalo upisati postoje dva rjsenja:
1-Upisati u tabeli default value neki znak
2-Napraviti kodnu tabelu.

Kodna tabela:
Nema podataka
Nije primjeljivo
Nepoznato
Ne koristi se

miro35 18.02.2013 10:33
Predmet:Re: Pretraživanje sa više kriterija

Razumio sam te.Evo kako sam ja to rješio sa null vrijednosti:
Znači na Change dogadjaj u polju preko kojeg vrÅ¡im pretragu sam napisao ovo:
Obrati pažnju na : "If (Me.txtSearchZaduzenjeSumar = "") Then
Me.txtSearchZaduzenjeSumar = Null
Me.List0.Requery
End If"
PreuzmiIzvorni kôd (Text):
  1. Private Sub TRSumarIme_Change()
  2. Dim vSearchString As String
  3.  
  4.     vSearchString = TRSumarIme.Text
  5.     txtSearchZaduzenjeSumar.Value = vSearchString
  6.     Me.List0.Requery
  7.     If (Me.txtSearchZaduzenjeSumar = "") Then
  8.     Me.txtSearchZaduzenjeSumar = Null
  9.     Me.List0.Requery
  10.     End If
  11. End Sub