<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 />
Dim rsUslov As ADODB.Recordset
     Set cn = CurrentProject.Connection
     Set rsUslov = New ADODB.Recordset
         rsUslov.CursorLocation = adUseClient
         rsUslov.Open "SELECT * FROM tblTempSQL", cn, adOpenForwardOnly, adLockOptimistic
      If rsUslov.RecordCount = 0 Then SQLSearch = "SELECT tblTemp.* FROM tblTemp"
             
         SQLSearch = "SELECT tblTemp.* FROM tblTemp WHERE (("
            rsUslov.MoveFirst
         Do While Not rsUslov.EOF
            SQLSearch = SQLSearch & "(tblTemp." & rsUslov.Fields("Pole") & ")=" & Chr(34) & rsUslov.Fields("SeBara") & Chr(34) & " OR "
            rsUslov.MoveNext
         Loop
         SQLS