Warning: A non-numeric value encountered in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 101

Warning: filesystem::file_put_contents(data/session_del.php): failed to open stream: Permission denied in /home2/icentarb/public_html/icentar/classes/class.filesystem.php on line 142
iCentar
Prikazi cijelu temu 22.08.2015 11:53
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: zabrana upisa vrijednosti u formi koja je veca od upisane u subformi
Evo kod.
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Kolicina_Exit(Cancel As Integer)
  2. Dim Kolicina As Single
  3. Dim Maks As Single
  4.  
  5. Maks = [Forms]![Forma1]![Forma2].[Form]![Broj]
  6. Kolicina = Me.Kolicina.OldValue
  7. If Kolicina > Maks Then
  8. Me.Kolicina = Maks - 1
  9. Cancel = True
  10. End If
  11. End Sub
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.