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 Disappointed

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 Smiling 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

switch 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 Cool
Prilozi:
Log_New.rar (Velicina datoteke:131.95 KB)