Centar za edukaciju-BiH

Predmet:Re: BeforeUpdate

---

Evo ovako:Na formi frmUlazDetanje combo interna:
-opcija Limit to list je stavljena na jes.
Sto znaci da nista nemoze proci sto ne postoji na izbornoj listi odnosnu sto ne izbaci upit koji je postavljen na rowsource ovoga polja.

sada imas i kod istim upozorenjem na dogadjaj not list i on ti u stvari i obavlja sav posao.
Ovaj kod koji si postavio na before update ne radi ni na ovoj formi a razlog je sledeci:
Na rowsource ovog polja imas upit koji ti izbaci sve redove iz tabele proizvodi u kojima je polje prikazi cekirano.
Da napomenem da polje 85a nije sekirano.

Sada u kodu podizes rekordset iz tabele proizvodi ali bez ikakovg uvjeta sto znaci sve podatke.
Onda ides u potragu za upisanim podatkom tj. 85a i naravno da ga ovdje ima te ne ispunjava uslov no math i ne izbacuje nikakvo upozorenje.
da bi radilo trebalo bi:
Set rstinterna = dbsbaza.OpenRecordset("select * from tblproizvodi WHERE prikazi=true",dbOpenSnapshot)

Znaci isti uslov kao i u rowsource ili jos bolje podici recordsetclone iz rowseource.
Set rstinterna = Me.interna.Recordset

U formi frmIzlazDetalji Polje interna ako stvis opciju limi to list na Yes radit ce ti na obje forme isto.

Znaci sav kod na before update je bespotreba ukoliko ga imas not list.

Pitanje je sta zelis postici.
Mozda ****lje da opises sta je sve moguce upisati u to polje a sta nebi trebalo da moze.

---

Predmet:Re: BeforeUpdate

---

ovo je sada ok

85a nije cekirano i to je ok
razlog je
bio je vazeci do danas a od danas nije vise vazeci
da operator nebi unio 85a jer je sad nevazeci onda sam postavio ovaj kod kao upozorenje da tog proizvoda vise nema

pozdrav
ramic

Predmet:Re: BeforeUpdate

---

Pa zosto ne go resis na najprost nacin,stavi edno dlookup na beforupdate koe ke ti vraka vrednost true I false I na osnova na ovaa vrednost stavi if then I resen problem.