Dim SQLSearch As String
   SQLSearch = "SELECT * FROM tblTemp WHERE Broj_No LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Godina_kad_je_verovatno_stvoren LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Broj_Kopija LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Format LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Grupa LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Naziv LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Moja_Firma LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR pnfPrezime LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR pnfIme LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Njihova_Firma LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR ppPrezime LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR ppIme LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Mesto_Gdje_Je_Stvoren LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Mesto_Kog_Se_Tice LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Osobe_Ime LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Osobe_Prezime LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Akcija LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34) _
             & " OR Opis LIKE" & Chr(34) & "*" & Me.pret.Text & "*" & Chr(34)
    Me.frmTemp_Subform.Form.RecordSource = SQLSearch
    Me.frmTemp_Subform.Requery