Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Private Sub Command7_Click() Dim KolSum As Single Dim proizvod As String Dim Ulaz As Single proizvod = Forms![kasa]![detalji].Form![proizvod] KolSum = DLookup("suma", "QSUMA", "Proizvod='" & proizvod & "'") Ulaz = Me.Ulaz If Ulaz > KolSum Then MsgBox "Ima samo:" & KolSum Me.Ulaz = KolSum Me.Ulaz.Set