<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 />
Function SetPrt(NazivI As String) As Boolean
Dim Db As Database
Dim Rs As Recordset
Dim SQL As String
Dim NazivP As String

Set Db = CurrentDb()
SQL = "SELECT * FROM Izvjestaji WHERE (((Izvjestaji.IzvjN)='" & NazivI & "'));"
Set Rs = Db.OpenRecordset(SQL)
NazivP = Rs.Fields(0)
Rs.Close
SQL = "SELECT * FROM Stampaci WHERE (((Stampaci.BrST)=" & NazivP & "));"
Set Rs = Db.OpenRecordset(SQL)
NazivP = Rs.