Centar za edukaciju-BiH


Stranice (3):1,2,3

#11 08.08.2011 16:37
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


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
↑  ↓

#12 08.08.2011 17:31
xl_kid Van mreze
Clan
Registrovan od:11.11.2008
Postovi:154


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
↑  ↓

#13 08.08.2011 17:41
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


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.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#14 08.08.2011 18:04
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


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...
↑  ↓

#15 08.08.2011 20:05
xl_kid Van mreze
Clan
Registrovan od:11.11.2008
Postovi:154


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
↑  ↓

#16 08.08.2011 20:19
xl_kid Van mreze
Clan
Registrovan od:11.11.2008
Postovi:154


Predmet:Re: problem - Run-time Error 13 Type Mismatch
ako query stavim na BE ne dobijam nista. na FE je ok.
↑  ↓

#17 08.08.2011 20:49
xl_kid Van mreze
Clan
Registrovan od:11.11.2008
Postovi:154


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:
Informacije o tipu datoteke za:zip  IWA-I_db_v.2011-xlk1.zip
Preuzimanja:294
Velicina datoteke:801.44 KB

↑  ↓

#18 08.08.2011 21:33
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


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
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#19 09.08.2011 06:08
xl_kid Van mreze
Clan
Registrovan od:11.11.2008
Postovi:154


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
↑  ↓

#20 09.08.2011 09:42
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Re: problem - Run-time Error 13 Type Mismatch
Odprilike tako pa ti sad nastavi Cool

Prilozi:
Informacije o tipu datoteke za:rar  Log_New.rar
Preuzimanja:298
Velicina datoteke:131.95 KB

↑  ↓

Stranice (3):1,2,3


Sva vremena su GMT +01:00. Trenutno vrijeme: 3: 07 am.