Private Sub Korisnik_AfterUpdate()
M_Oper.OperID = Me.Korisnik.Column(0)
M_Oper.KorImeO = Me.Korisnik.Column(1)
M_Oper.ImeO = Me.Korisnik.Column(2)
M_Oper.PrezO = Me.Korisnik.Column(3)
End Sub