<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 Form_Load()
Dim db As Database
Dim rs As Recordset
Dim RegBr As String
Dim Broj As String
Set db = CurrentDb()
Dim MojBroj As String

Set rs = db.OpenRecordset("SELECT vrijednost FROM Opcije WHERE ID=1")
RegBr = Format$(rs.Fields(0))
Broj = Korisnicki_Broj(BrojDiska())
MojBroj = Provj