freeman 10.12.2017 20:09
Predmet:Re: Uređivanje Dodjela nagrada

Evo napravio sam box za pretragu.Naravno poslužio sam se nekim rješenjima s ovog foruma.E sad bi molio još pomoć oko Operatora odnosno osobe koja unosi podatke.Pridružio bi nekakvu tablicu s operatorima ali kako to povezati.Znači neki ID osobe koja se logirala i unosi podatke.Da se zna ko je upisao i kada neko ime .Vidio sam također neke djelove rješenja ovdje ali nikako da to povežem u neku funkcionalnu cjelinu.Vjerujem da i sami imate nekakva rješenja pa vas molim za pomoć oko moje baze.Pozdrav

freeman 03.12.2017 20:23
Predmet:Uređivanje Dodjela nagrada

Napravio bi access bazu koja bi evidentirala Nagrađene pojedince ili timove,grupe.
Želio bi napraviti formu za unos podataka navedenih.Koja bi davala dopuštenje da pojedini ne mogu istu nagradu dobiti više puta.Odnosno ako su već dobili ranije neku od nagrada da se pojavi dijaloški okvir sa upozorenjem da pojedinac ili grupa imaju već tu nagradu od ranije .Ujedno sam htio napraviti box za pretragu gdje bi pri upisu imena dobio izlistanje nagrada koje je pojedinac ili grula dobila,ako je.U prilogu sam nešto radio ali mi taj način nekako ne izgleda funkcijonalan.Pa vas molim ako neko ima neu ideju ili rješenje da pomogne.Pozdrav

freeman 03.12.2017 20:31
Predmet:Re: Uređivanje Dodjela nagrada

Pardon.Evo mog primjera.Kako sam zamislio.
Prilozi:
nagrade.rar (Velicina datoteke:86.83 KB)

Gjoreski 03.12.2017 21:21
Predmet:Re: Uređivanje Dodjela nagrada

Nisam gledao tvoj primer ali ja bi napravio to tako da imamo jednu nevezanu formi u koja bi unosili podatke o nagradu grupe ili poedinca i bi stavio jedan butoon koj bi se zvao cmdIzvrsi ,na negov dogadzaj ONClick bi stavio procedura koja bi proveravala svaku grupu ili svaki poedinac dali je dobio tu nagradu ,ako nije dobio onda bi upisao u databazu ako je dobio onda bi izbacio poruka da je ta nagrada vec dodeljena.

Tako ja razmisljam.

zxz 04.12.2017 17:27
Predmet:Re: Uređivanje Dodjela nagrada

Malo sam pogledao i koliko vidim nije lose napravljeno ono sto je uradjeno.
Primijetio sam da imas institucije(timove) i lica u dodjeljivanju nagrada.
Pretpostavljam da i lica pripadaju odredjenim timmovima mozda nebi bilo lose da se pribiljezi za lice u kojem timu se takmicio kada je dobio nagradu.

Jos nesto.
U formi frmImenaPrimatelja mozda bi trebalo u subformi nagrada zabranicti unos novog rekorda odnosno da se tu mogu samo vidjeti nagrade za svakog pojednica a ne unositi.

Godine se mogu napraviti lista kodom pa nemora biti tabela tako da bi svake nove godine dobili automatski tu godinu bez unosa.

Eto vidi ovo pa ako se slazes i mozemo u realizaciju pretrage i ostalog.

Naravno mozda je dobro sacekati da jos neko da svoje misljenje.

freeman 04.12.2017 19:31
Predmet:Re: Uređivanje Dodjela nagrada

Odlične su vam ideje.I Gjoreski i zxz.Volio bi vidjeti na primjeru ideju Gjoreskog o formi sa izvršnim butoonom.Znači Nova imena ili timovi bi se unosila u formu za unos Imena ili tima sa prijedlogom da je subforma zaključana.Trebao bi još dolje kod za kombo box da pogrešku prilikom upisa imena kojeg nema
izbaci dijaloški okvir da operater bira samo imena s liste,ili nagrade. Ovo sa godinama je još bolje.S tim da treba imati u vidu da evidencija o ranije dobivenim nagradama mora se popuniti.Nakon toga bi za svaku novu godinu išlo automatski. Slažem se i za lica koja pripadaju određenim timovima je super.Box za pretragu bi služio da prilikom upisa imena ili tima u subformi pokaže ime i nagrade koje je dobio.
Pozdrav svima

zxz 04.12.2017 20:36
Predmet:Re: Uređivanje Dodjela nagrada

Jos mi nesto pade napamet.
Dodjele nagrada se vrse na odredjenim manifestacijama odnosno turnirima koliko ja znam.
Da mozda netreba napisati i manifestaciju na kojoj je dobio trofej.
neznam ali to mi pade napamet.
Znaci bila bi tabela manifestacija pa onda godina i onda trofeji.

zxz 04.12.2017 20:57
Predmet:Re: Uređivanje Dodjela nagrada

Evo procesura za godine.
Stavi je u Modul.
Function Godine(Od As Integer)
Dim I As Integer

For I = Od To Year(Date)
Godine = Godine & I & ";"
Next I
Godine = Left(Godine, Len(Godine) - 1)
End Function
Na on enter combo boxa stavi
Me.ImetvogComba.Rowsource=Godine(BrojGodineOdkojezelisdapise)

freeman 04.12.2017 22:17
Predmet:Re: Uređivanje Dodjela nagrada

Evo na mom primjeru stavio sam Modul.
Samo ne radi mi dobro.

freeman 04.12.2017 22:19
Predmet:Re: Uređivanje Dodjela nagrada

Evo primjea:
Prilozi:
nagrade.rar (Velicina datoteke:102.88 KB)