[ spaleivan @ 01.12.2010. 22:32 ] @
Potrebna mi je pomoc oko pravljenja korisnickih naloga u acessu 2003. napravio sam grupe, ali mi je potrebno pored toga da ubacim i korisnike koji ce se logovati sa svojim siframa. pomoc mi je neophodna i nadam se da ce mi neko pomoci. unapred hvala.
[ smal @ 01.12.2010. 22:45 ] @
Iako postoji na forumu dosta rešenja od ranije, uz poruku je malo prepravljen primer sa www.databasedev.co.uk/login.html, koga ja koristim. Mislim da je dobar.
[ spaleivan @ 02.12.2010. 07:29 ] @
Hvala puno na pomoci, odlicno ovo radi.
Hvala....
[ spaleivan @ 02.12.2010. 08:57 ] @
potrebna mi je opet pomoc, a to je kako sada ovu formu da povezem za tri korisnika, adminom, pera, mika, od kojih admin ima sve dozvole, vide mu se svi prozori i moze da menja podatke, cuva backup, zatim na primer pera ima sve dozvole da unosi menja i brise podatke, dok mika sme samo da unosi podatke, ili tako vec nekako...
[ smal @ 02.12.2010. 15:30 ] @
Ako ti engleski jezik nije prepreka, na pr. na već pomenutom sajtu www.databasedev.co.uk/access_security.html postoji detaljan tutorial sa objašnjenjima.

Imaj u vidu da je Workgroup Security izuzetno komplikovan i naporan mehanizam za podešavanje, a pri tom i nije bogzna kako siguran, tako da ga je često bolje izbegavati...
[ SLOJ.1973 @ 03.12.2010. 19:20 ] @
Napraviš tabelu tblGrupe sa poljima IDGupa tipa AutoNumber (LongInteger) i polje NazivGrupe tipa Text.Zatim napuniš tu tabelu podacima recimo 1-Admin;2-Korisnik;3-Gost itd. Napraviš drugu tabelu tblzaposleni sa poljima Sifra;Ime;Prezime;IDgrupa i vežeš polja IDGrupa sa poljem IDgrupa jedan prema više.Zatim napraviš nov modul i u njemu ubaciš Public Grupa as Long.E sad prilikom unosa lozinke u frmLozinka puniš tu promenjljivu pomoću koda
Code:
Grupa = DLookup("IDgrupa", "tblzaposleni", "[sifra]='" & Me.lozinka.Value & "'")
gde je Me.lozinka.Value sadržaj text polja lozinka sa forme frmLozinka tj.sifra iz tabele tblzaposleni.
Pošto je promenljiva napunjena,sada prilikom svakog otvaranja neke forme proveravaš koju vrednost ima Grupa:da li Grupa ima vrednost 1 (Admin),2 (Korisnik) itd.pomoću koda
Code:
If Grupa = 1 Then
Exit Sub 'Sto ce reci nastavi sa radom
Else
MsgBox "Nemate pravo pristupa ovom delu programa!", vbCritical, "Neovlasceni pristup"
DoCmd.Close
DoCmd.OpenForm "NekaForma"
End If
ili
Code:
If Grupa <> 1 Then
MsgBox "Ne pripadate grupi :ADMINISTRATOR,nemate pravo ulaska u ovaj deo programa.", vbCritical, "PRIJAVLJENI STE KAO: < KORISNIK >"
.
To isto možeš primeniti na organizovanje toolbara,napraviš toolbar za Admina i toolbar za Korisnika i posle prijave kroz formu frmLozinka u zavisnosti da li je prijavljen Admin ili Korisnik omogućavaš/neomogućavaš prikaz određenog toolbar-a.Pozdrav i nadam se da sam ti pomogao.
[ Zoran.Eremija @ 03.12.2010. 20:13 ] @
U prilogu sam stavio primer kako sam ja svojevremeno zamislio. Ja sam Grupu prekrstio u Meni jer me asociralo na menije koje mozete definisati. Takodje u prilogu sam stavio i fajl koji se zove Korisnik.cfg koji je takodje mdb samo sam ga prekrstio da ko bajagi zavaram korisnika. Uloga je da se u njemu definisu parametri instalisane aplikacije ako bi odvojili Front-end i Back-end. Da bi vam radila aplikacija treba da prelinkujete tabelu System prema tom Korisnik.cfg fajlu.

Imate definisana 2 korisnika

zoran / zoran i
a / a

Kako funkcionise aktivan korisnik opisao je kolega @SLOJ.1973

Takodje u prilogu sam postavio i model podsistema korisnik aplikacije.


[Ovu poruku je menjao Zoran.Eremija dana 03.12.2010. u 21:59 GMT+1]