<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 IDdokumenta_AfterUpdate()
Dim Br As Integer
Dim ImeKompa As String
Dim ID As Integer, Poz As Integer

ImeKompa = Environ(6)
Poz = InStr(1, ImeKompa, "=") + 1
ImeKompa = Mid(ImeKompa, Poz)
Br = DCount("[BrojDok]", "tblDokumenti", "[IDdokumenta]=Forms!frmDokumenti.IDdokume