Prikazi cijelu temu 20.03.2011 12:32
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: Baza za proizvodnju
Posto sad imam malo vise vremena prvo da pojasnim tabelu A_meni lista.
ID-Å idra ili broj zapisa
Parent-->Parent pripadajuci hijerarhijski
Iimgindeks-->Broj slike (ikone) ako je ima
Naziv-->Naziv koji se prikazuje u meniju
ime-->Ime objekta Forme izvjestaja rabele itd..
tip-->Tip objeta(1-forma;2-Izvjestaj;3-Tabela;4_Query;5-Proc
edura;6_Shell) Znaci tip objekta koji ce se podici kada kliknemo na naziv u formi.
Grupa-->Polje koju je vezano za nacin podizanja.Naime ovim poljem mozemo regulisati kako ce objekat biti podignut pomocu koda.Istu forum mozemo podici na vise nacina napr. da bude samo za citanje a u drugoj grupi da bude data entry ili pak samo da izmijenimo dizajn.
To je rijeseno u proceduri Otvori u ovom dijelu:
PreuzmiIzvorni kôd (Visual Basic):
  1. '------------------------------------Na
  2. in otvaranja forme-----------------------------------------------
  3.     Select Case Grupa
  4.         Case 1 'Forma samo za upis Nevidi heder forme
  5.                Set Frm = Forms(ImeO)
  6.                 Frm.FormHeader.Visible = False
  7.                 With Frm
  8.                  .RecordSelectors = False
  9.                  .NavigationButtons = True
  10.                  .VrstaPID.Visible = False
  11.                  .DataEntry = True
  12.                 End With
  13.                 Frm.Picture = "(none)"
  14.                 Frm.InsideHeight = Frm.Detail.Height
  15.                 Frm.FormFooter.Height = 10
  16.                 Frm.FormHeader.Height = 0
  17.                 Frm.Detail.BackColor = 14737890
  18.                 Frm.ScrollBars = 0
  19.                 DoCmd.MoveSize 2880, 0
  20.        Case 2 'Ispravke
  21.                Set Frm = Forms(ImeO)
  22.                 Frm.Picture = "(none)"
  23.                 Frm.InsideHeight = Frm.Detail.Height + Frm.FormFooter.Height + Frm.FormHeader.Height + 10
  24.                 Frm.FormHeader.BackColor = 12632256
  25.                 Frm.Detail.BackColor = 11916754 '14737890
  26.                Frm.FormHeader.Visible = True
  27.                 Frm.FormFooter.BackColor = 12632256
  28.                 With Frm
  29.                  .DataEntry = False
  30.                  .AllowDeletions = False
  31.                  .AllowEdits = True
  32.                  .AllowAdditions = False
  33.                  .RecordSelectors = False
  34.                  .NavigationButtons = True
  35.                 End With
  36.         Case 3 'Pregledi
  37.               Set Frm = Forms(ImeO)
  38.                 Frm.Picture = "(none)"
  39.                 Frm.FormHeader.Visible = True
  40.                 Frm.FormHeader.BackColor = 12632256
  41.                 Frm.Detail.BackColor = 11916754
  42.                 Frm.InsideHeight = Frm.InsideHeight + 500
  43.                 With Frm
  44.                  .DataEntry = False
  45.                  .AllowDeletions = False
  46.                  .AllowEdits = False
  47.                  .RecordSelectors = False
  48.                  .NavigationButtons = True
  49.                 End With
  50.             Case 4 'NiÅ¡ta
  51.  
  52.                
  53.             Case 5 'NiÅ¡ta
  54.  
  55.             Case 6 '
  56.               Set Frm = Forms(ImeO)
  57.                 Frm.FormHeader.BackColor = 11978164
  58.                 Frm.Detail.BackColor = 11916754
  59.                 Frm.FormFooter.BackColor = 11978164
  60.                 DoCmd.OpenForm ImeO, , , , , acDialog
  61.                 DoCmd.MoveSize 3100, 0
  62.                 Set Frm = Nothing
  63.             Case Else
  64.                 MsgBox "GreÅ¡ka poziva" & vbCr & "Br:" & Err.Number, vbExclamation + vbOKOnly + _
  65.                 vbDefaultButton1, "Greska!!!"
Polje opis je ostavljeno ako zelimo dati jos neki dodatni opis kao help.
SQL-->Ja ga koristim tako sto napravim jos jednu tabelu Koja se zove npr. A_SQL u kojoj zapisujem SQL te ga odatle koristim odnosno zapiszjem U recordsource objekta pri podizanju.
Znam da je mozda nekima to tesko razumjeti pa eto da kazemo da ovo polje moze biti prazno za sad.
soet-->samo polje govori koristi se za redosled slaganja u ovoj tabel
Meni---> polje predvidjeno da se moze manipulistai stavkama u meniju tj. dali ce one biti vidljive ili ne.
Prava---> ovo polje se koristi ako zelimo ograniciti prava proistupa zavisno od privilegija operatera.
Sve ovisi o tobe sta narucilac app. zeli.
Moze se cak napraviti da svaki pojedinac logovan pod svojim acc. ima drugacija prava stim da se onda mora dodati i tabela popisa prava ili pak to podijeliti u par grupa kao sto su:
Operater
Admin
Gost
Ovdje ima zip file Za activx od menija:
http://www.icentar.ba/...nt&id=305
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.