Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

  • 3 odgovora
  • 2.178 pregleda

Najnovija ↓

Customizirani DefaultValue 17.03.2006. u 23:45 · pre 251 mesec #1
Hoću da napravim polje RedniBroj čije DefaultValue svojstvo zavisi od prethodno unetih rednih brojeva, ali da to ne bude autonumber.
Imam SELECT TOP 1 query (qryNajveciRB) koji nalazi trenutni najveći redni broj i funkciju koja vraća sledeći RB koji treba da bude DefaultValue:

Code:
Private Function SledeciRB()
'Funkcija koja vraca sledeci broj za polje RedniBroj
Dim intSlBr As Integer
intSlBr = 1 + Nz(DMax("RedniBroj", "qryNajveciRB"), 0)
SledeciBroj = intSlBr
End Function


Sad mi nije jasno kako ovu funkciju da implementiram da bude DefaultValue. Koje evente treba da koristim da bi ovo proradilo?
Probao sam da ubacim u event OnLoad forme (me.RedniBroj.DefaultValue = SledeciBR) ali to ne radi.
Ako neko zna drugačiji način rešenja ovog problema, neka postuje ovde, pa da isprobam. Sa ovim polovičnim rešenjem sam se zaglavio.
Potpis
Gone Shootin'
Re: Customizirani DefaultValue 20.03.2006. u 21:51 · pre 251 mesec #2
Otvori formu u Design modu.
U Default value za text box unesi =SledeciRB()
I to je sve.
Re: Customizirani DefaultValue 21.03.2006. u 12:31 · pre 251 mesec #3
Ja sam nesto slicno pito ovde:
https://www.elitesecurity.org/t167003-Record-counter

Mada meni odgovor nije najjasniji, valjda jer sam pocetnik pa ne znam dovoljno, ali mozda tebi nesto vise znaci.

Ipak ovo sto meni treba izgleda nije isto, ako sam dobro shvatio tvoji redni brojevi za odredjeni rekord kada jednom budu odredjeni u tabeli vise se nece menjati, a meni je potrebno da redni broj rekorda bude promenljiv u zavisnost kako filtriram rekorde u odredjenoj formi. Tj, ako npr. promenim u formi redosled ili broj rekorda sortiranjem ili filtriranjem onda i redni brojevi za te rekorde se moraju izmeniti.

Potpis
Vule
Re: Customizirani DefaultValue 21.03.2006. u 19:55 · pre 250 meseci
izmenjeno 1 put, poslednji put electroNik 21.03.2006. u 19:57
  1. electroNik21.03.2006. u 19:57zapis iz teksta poruke
#4
@ Zidar: Hvala, radi.
Mada, morao sam da dodam dve linije koda u AfterInsert event da bi sve radilo kako treba:
Me.Requery
DoCmd.GoToRecord , , acNewRec 'jer me Requery metod bacao na prvi unos (u datasheet pregledu).
Potpis
Gone Shootin'
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme