roko | 08.08.2011 17:37 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch Zašto ne napraviš rejting recim svaki korisnik ima rejting od jedan do deset ili subtabela ko što može otvoriti i onda prema vrsti posla korisnik može ili nemože imati pristup podacima u tabeli l_operatori napravi rejting 1 do 10 i onda dodjeli korisnicima rejting a formu označi sa recimo 8 kupci pa korisnik ako mu je rejting manji od 8 nemože pristupiti kupcima. lil napravi tagelu s imenima forma pa ih dodjeli korisnicima ko što može ili nemože otvarati |
xl_kid | 08.08.2011 18:31 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch vise mi se svidja ovaj drugi pristup. znaci, to bi trebalo da izgleda ovako: tbl_forme u kojoj je ime forme i pristup u kojoj bi upisivao id korisnika koji moze pristupiti. E sad mi je potrebna pomoc. Ja sam na svakoj formi on open stavio da proverava korisnika ali kao sto smo videli imam problem sa tim. Kako da resim taj problem |
zxz | 08.08.2011 18:41 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch Neznam dali koristis i moju tabelu za meni listu ako koristis tamo imas upravo tako rijeseno. Imas polje pristup u njega upisujes grupu koja moze pristupiti tom objektu. |
roko | 08.08.2011 19:04 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch evo prvo si napravi qery u sql wive i stavi ovo dole SELECT MSysObjects.Name FROM MSysObjects WHERE (((MSysObjects.Type)=-32768)); to su sve forme u tvojoj bazi podataka naprvi recimo jednu tabelu koja ima id auto pa naziv forme ( kombo s ovim queriyem) i recimo true/false da otvara ili ne otvara i naravno L_operateri_ID da spojiš tu tabelu sa L_operateri tabelom 1 -many poslije napravi novu formu recimo postavljanje administracije pa provaj L_operafor da ti je forma a ta druga tabela subforma ... iza toga možemo dalje poz... |
xl_kid | 08.08.2011 21:05 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch @zxz naravno da koristim. zasto menjati nesto ako dobro radi da li si mislio na tabelu ObjektMeni (Objekt ID, NazivObjekta, Tip, Redosled) @roko vec imam takvu tabelu koju do sada nisam koristio za prava pristupa i ako sam mogao (zxz me je podsetio) pokusacu kao sto si rekao pa se javljam kasnije |
xl_kid | 08.08.2011 21:19 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch ako query stavim na BE ne dobijam nista. na FE je ok. |
xl_kid | 08.08.2011 21:49 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch evo i primera sa administracijom. ovo je kad su tabele i forme spojene u jedan mdb poz |
|
Prilozi: IWA-I_db_v.2011-xlk1.zip (Velicina datoteke:801.44 KB) |
zxz | 08.08.2011 22:33 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch Uf ovo je stari meni. U njemu trebas dodtati polje u tabeli ObjektniMeni i to kao broj (Number) Ovo pšolje trebas dodati u u list box pomocni koji se nalazi na formi Glavni_meni. Prava trebas dodjeljivati tako da sa vecim brojem ima prava pristupa i svim sa manjim Brojevima. Primjer: Admin 5 Supervizor 4 Grupovodja 3 Sef Odjela 2 Korisnik 1 Gost 0 U ovakvoj podjeli napr ako stavis na formi odnosno u pomocnom meniju 3 znaci da ce moci svi pristupiti od 3 pa na vise. U proceduri na formi Glavni_Meni OK_Klick dodaj dio koji je u spjleru. Private Sub OK_Click() Dim db As Database Dim frm As Form Dim Response Dim G1, P2, Grupa As Integer Dim G2, P1 As String Grupa = M_Oper.PravaO 'On Error GoTo Greska
Spoiler:
If Format$(Me![Pomocni].Column(2)) = "" Then GoTo Izlaz End If P1 = Me![Pomocni].Column(2) 'Naziv objekta P2 = Me![Pomocni].Column(3) 'Tip objekta |
xl_kid | 09.08.2011 07:08 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch vise mi odgovara da pristup formama dajem pojedinacno, za svakog korisnika posebno. "roko" mi je dao odlicnu ideju, samo da je sprovedem u delo. potrebna mi je sad pomoc kako da stavim dva uslova (if PristupOper = OperID and if Pristup = "Yes") ako sam lepo definisao. znaci ako je logovani korisnik i ako ima pristup onda otvori formu a ako ne msgbox |
roko | 09.08.2011 10:42 |
---|---|
Predmet:Re: problem - Run-time Error 13 Type Mismatch Odprilike tako pa ti sad nastavi |
|
Prilozi: Log_New.rar (Velicina datoteke:131.95 KB) |