Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Private Sub AttachPivo_Click() ' naziv procedure u ovom slu?aju Zaka?i koju pivu Dim pivnica As RekaPiva ' Dimenzionisi prostor za smjestaj piva Dim gajba As Pivoset ' Dimenzionisi nacin upotrebe Dim flasa As LongGutljaj ' dimenzionisi kolicinu u jednom cugu Set pivnica = CurrentRekaPiva() ' Pripremi prostor za upotrebu Set gajba = RekaPiva.OpenPivoset("MagacinPiva", dbOpenGajbaset) ' Otvori prostor i prilagodi ga za upotrebu For flasa = 1 To gajba ' Uzmi flasu iz