<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 />
Ovaj kod kopiraj u neki modul.
Option Compare Database
Option Explicit
Dim Db As Database
Function Strojevi(ID As String, Kategorija As Integer)
Dim ImeTabele As String

Set Db = CurrentDb
Db.Execute "DELETE*FROM [Indeks]"

Select Case Kategorija
Case 0
Kombinacija:
ImeTabele = "tblKombinacija"
Zapisi ImeTabele, ID
GoTo STROJ
Case 1
STROJ:
ImeTabele = "Stroj"
Zapisi ImeTabele, ID
GoTo SKLOP
Case 2
SKLOP:
ImeTabele = "SKLOP"
Zapisi ImeTabele, ID
GoTo Podsklop
Ca