Prikazi cijelu temu 16.01.2019 01:31
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: Pretraga
Napravi jedan komandni taster.
Na on klik tog tastera stavi sledeci kod:
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub  ImeTastera_Click()
  2. Dim sql As String
  3. Dim kriterij As String
  4.  
  5. kriterij = Me.Text11 & "*'"
  6. sql = "SELECT * FROM Imenik WHERE (Ime & ' ' &  prezime) like '" & kriterij
  7. Me.RecordSource = sql
  8.  
  9. End Sub
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.