zxz 24.12.2010 17:58
Predmet:Re: Server i Access baza

Onda ti je neko to uradio kodom.
Imas select case koji ucitava u source object subforme razlicite subforme.

Evo ti napravi ovako
Napravi praznu formu te je upisi na mjesto dosadasnje subforme.
Trabalo bi sve da radi kako valja.

zxz 24.12.2010 19:51
Predmet:Re: Server i Access baza

Uf sad kada sam ozbiljnije pogledao vidio sam da ti imas uvezene jednovremeno 3 subforme. Samo je pitanje kada je koja vidljiva.
Nije ni cudo sto radi spoto.
Mogao si kroz jedan okvir uvoziti sve.
Morat ces mi poslati i ostale subforme jer ovdje nesto nedostaje.
Pvim se treba ozbiljnije pozabaviti.

Mogao bih ti opisati ali neznam dali ces uspjeti pa ****lje da mi posaljes.

Nedostaje:
Sklop subfor
Podsklop subfor
Čvor subfor

Prettpostavljam da ti je neko dao ovaj kod ali ti ga nisi iskoristio jer je pogresno pisalo ime subformi
Sklop subfor-Verovatno treba Sklop subform

pmiroslav 25.12.2010 12:13
Predmet:Re: Server i Access baza

Evo Å¡aljem dopunjeno
Prilozi:
Proces.rar (Velicina datoteke:498.98 KB)

zxz 26.12.2010 00:45
Predmet:Re: Server i Access baza

Evo ja sam nesto pokrpio.
Brze ce raditi to je sigurno. U funkcionalnost nisam ulazio jer vjerovatno bi trebalo iz temelja mijenjati.
Koliko vidim ovo je odrzavanje strojeva. Imao sam tu bazu da si mi trazio samo.
Ovdje sam zakacio samo ovu formu.
Inportuj je u svoju aplikaciju a svoju preimenuj.
Isto tako sam prepravio kod da ti netrebaju one subfor subforme. Imao si iste ime samo na kraju jedna subfor a druga subform.
Koliko sam ja vidio iste su sem dizajna a to mozes kodom rijesiti ako ti bude trebalo.
Prilozi:
prazna.zip (Velicina datoteke:32.84 KB)

pmiroslav 26.12.2010 19:56
Predmet:Re: Server i Access baza

Hvala ti na ovom, poÅ¡to sutra radim, ja ću to na poslu malo bolje proučiti.
Ovdje se radi o proizvodnji strojeva i ova početna forma mi služi za slaganje Å¡eme montaže strojeva i na osnovu toga izdavanje pripadajuće dokumentacije za radne naloge.

zxz 26.12.2010 20:08
Predmet:Re: Server i Access baza

To se sad vec duze vrijeme koristi i netreba razmisljati o vecim izmjenama. Bolje praviti novu verziju.
Ovo ce ti sigurno mnogo brze raditi.
Zaboravih combo SelectProduct rowsource.
Izbrisi tamo u rowsource neka bude prazno.

pmiroslav 27.12.2010 12:30
Predmet:Re: Server i Access baza

Testirao sam sada ovaj tvoj primjer. Početna forma se brže otvori, ali sada ima nekih drugih problema.
Sa desne strane imam onu sekciju kalkulacije i sada se tu nešto poremetilo.
UpiÅ¡em broj komada i klik na dugme složi i sada to traje jeko dugo. PjeÅ¡čani sat nikako da zavrÅ¡i.
Ispod dugmeta Složi je se pokreču funkcije Shema() i Slozi() i kada ih pokrenem ručno iz Immadiate Window odradi se OK. međutim sa dugmetom se zaglavi.

Šaljem svoj dopunjeni primjer. Kada to vidiš možda sam ja tu nešto zakomlicirao, ali to je najbolje što sam znao da mi program odradi posao.
Prilozi:
Proces_za Forum.rar (Velicina datoteke:496.59 KB)

zxz 27.12.2010 13:09
Predmet:Re: Server i Access baza

Da nisam ja do kraja to razmotrio. Trudio sam se samo da ne poremetim tvoje ali da sam razumio nisam.
U stvari to bi trajalo lakse bi napravio novu formu. Moglo se to jos ubrzati ali negdje nisam smio da mijenjam jer nisam znao cemu sluzi.
Pogledat cu ovo tvoje. Rijesit ce se i to.

zxz 27.12.2010 13:36
Predmet:Re: Server i Access baza

Evo ispravi ovo ili kopiraj umjesto tvoje procedure:
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Command_Kalk_Click()
  2. On Error GoTo Err_Command_Kalk_Click
  3.  
  4.  If IsNull([txtKomada]) Or [txtKomada] = 0 Then
  5.         MsgBox "Niste upisali broj komada", vbCritical, "Nedostaju podaci"
  6.         Me![txtKomada].SetFocus
  7.         'GoTo Kraj
  8.    End If
  9.     CurrentDb.Execute "DELETE*FROM [ZbirnikKonacni]"
  10.  
  11. DoCmd.Hourglass True
  12.  
  13.              '-----------------------------------------------------------
  14.      Call Shema  'Poziva se Funkcija SHEMA u Deklaracijama
  15.             '------------------------------------------------------------
  16.            
  17.                
  18.         DoCmd.OpenQuery "ZbirnikQryApp", acNormal, acEdit     'Kopiranje iz ZbirnikQry u tablicu ZbirnikKonacni
  19.        DoCmd.OpenQuery "ZbirnikPNDQryApp", acNormal, acEdit  'Kopiranje iz ZbirnikPNDQry u tablicu ZbirnikKonacni
  20.        DoCmd.OpenQuery "ZbirnikStrojPNDQryApp", acNormal, acEdit
  21.                
  22.    
  23. DoCmd.Hourglass False
  24. Exit_Command_Kalk_Click:
  25.     Exit Sub
  26.  
  27. Err_Command_Kalk_Click:
  28.     MsgBox Err.Description
  29.     Resume Exit_Command_Kalk_Click
  30. DoCmd.Hourglass False
  31. End Sub

U funkciji Function Shema()
Ispravi samo ovo:
bilo je SELECT Case IDKategorije
A sada treba.
Select Case Val(Forms![IzborProizvoda]![SelectCategory]) 'ZXZ-ovdje ispravljeno

Ti si imao ovdje globalnu variablu ali netreba ti .

I pored ovoga meni prijavljuje gresku u stvar kaze da nedostaje neki Query.

Vjerovatno ovdje nije sve ili mozda sto si mijenjao polja id u string.

Probaj ovo napraviti pa mozemo dalje.
Vjerovatno kada bi ja znao sta se sve radi sa ove forme lakse bi dosli do rjesenja.
Ne ono sta ti sad radis nego sta se radi u praksi.

pmiroslav 27.12.2010 13:41
Predmet:Re: Server i Access baza

Da pojasnim.
Stroj koji proizvodim sastoji se od tehnoloških cjelina koje su popisane u tablici ListaKategorija:

1 - Stroj
2 - Sklop
3 - Podsklop
4 - Čvor
5 - Pozicija

Pozicije su osnovni dijelovi od kojih se satavljaju ostale cjeline.
Čvorovi su dijelovi koji se sastave od dvije ili viÅ¡e poizicija
Podsklopovi su dijelovi koji mogu biti sastvljeni od čvorova i pozicija
Sklopovi su dijelovi koji se sastavljaju od podsklopova, čvorova i pozicija ( ali nije nužno da budu ukjučene sve tri kategorije.
Strojevi su opet gotovi proizvodi koji se sastavljaju od gore navedenih tehnoloških cjelina.

Osovna tablica je Proces gdje se upisuju osnovno podaci o svim gore navedenim elementima.

U tablice

Stroj
Sklop
PODSKL
CVOR

upisuje od kojih sastavnih dijelova se radi koja tehnološka cjelina (to je šema montaže.

PND je standardni materijal kao npr. Boja, Å arafi itd.

U tablici PROCESOP je popis radnih operacija za izradu određenog dijela.