<br />
<b>Notice</b>:  Undefined offset: 2 in <b>/home2/icentarb/public_html/icentar/classes/class.permissions.php</b> on line <b>735</b><br />
Private Sub Command17_Click()
Dim SQL As String, Kriterij As String, RecordSource As String
Dim Brojac As Integer

SQL = "SELECT * FROM Imenik"
Kriterij = ""
Dodaj_Kriterij Me.Text11, "(ime & ' ' & prezime)", Kriterij, Brojac
Dodaj_Kriterij Me.Text18, "grad", Kriterij, Brojac
    If Kriterij <> "" Then
        Kriterij = " WHERE " & Kriterij
    End If
    RecordSource = SQL & Kriterij
    Me.RecordSource = RecordSource
    If Me.RecordsetClone.RecordCount = 0 Then
    MsgBox "Nema podataka"
    End If
End Sub

Private Sub Dodaj_Kriterij(VrijednostPolja As Variant, ImePolja As String, Kriterij As String, Brojac As Integer)
    If VrijednostPolja <> "" Then
        If Brojac > 0 Then
            Kriterij = Kriterij & " AND "
        E