Centar za edukaciju-BiH

iCentar → Racunari i oprema → Programirannje i baze podataka → Access


Prosiri i skupi Opcije teme
Stranice (22):1,2,3,4,5,6,7 ... 21,22
 Prikazi prvu neprocitanu poruku

#41 29.12.2010 22:50
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,711


Predmet:Re: Server i Access baza
Sad vidim da ti ni polja nisu ista pa moramo prvo ovo rijesiti. Ja sam u pocetku kopirao tabelu tblShemaMontaze u Tblshema i pobrisao podatke iz nje.
Sad vidim da tvoja tabela tblshema nema ista polja kao tblShemaMontaze.
Neznam zasto je to tako. Rekao si mi samo da si dodao ID polje autonumber.
Ako kopiras iste redove valjda bi i polja trebala biti ista prvo da to rijesimo.
Ako nisu ista onda koje polje odgovara kojem polju.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#42 30.12.2010 00:39
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,711


Predmet:Re: Server i Access baza
Evo slozi polja u TblsHema ovako:
id
Kaegorija
IdStroja
Index
IdDijela
KomStr

Ovo zadnje nadam se da je broj komada

Procedura:
PreuzmiIzvorni kôd (Visual Basic):
  1. Function PrenesiPod(Kategorija As Integer, IdStroja As String)
  2. 'Ulaz kategorija= 1 i idstroja=0008239
  3. Dim Db As Database
  4. Dim Rs1 As Recordset
  5. Dim Rs2 As Recordset
  6. Dim Rs3 As Recordset
  7. Dim SQL As String
  8. Dim Dio As String
  9. Dim I As Integer
  10. Dim BrojKolona As Integer
  11.  
  12.  
  13. Set Db = CurrentDb 'set baze
  14. SQL = "SELECT * FROM tblShemaMontaze " _
  15.     & "WHERE kategorija=" & Kategorija & "  AND IDstroja='" & IdStroja & "'"
  16. ' gdje je kategorija=1 i idstroja=0008239 iz tabele  tblShemaMontaze
  17. Set Rs1 = Db.OpenRecordset(SQL) 'Podigni Rs1 sa gore navedenim SQL-om
  18. Set Rs3 = Db.OpenRecordset("tblShema")'POdigni u Rs3 tabelu tblShema
  19. BrojKolona = Rs1.Fields.Count 'Prebroj polja u Tabeli  tblShemaMontaze
  20. Do While Not Rs1.EOF 'Pocetak petlje sa rs1
  21. Dio = Rs1!IdDijela ' upisi u mem. dio iz polja IdDijela
  22. Rs3.AddNew ' Novi upis u tabelu tblshema
  23.        For I = 1 To BrojKolona ' broj od 1 do broja polja u tabeli  tblShemaMontaze
  24.        Rs3.Fields(I) = Rs1.Fields(I - 1) ' prepisi polje iz tabele  tblShemaMontaze u tabelu tblShema
  25. 'Posto ova tabela ima jednu kolonu vise onda zapisujem kolonu nula iz  tblShemaMontaze u kolonu 1
  26. 'Prva je autonumber
  27.        Next I
  28. Rs3.Update 'zapisi
  29. SQL = "SELECT * FROM tblShemaMontaze " _
  30.      & "WHERE IDstroja='" & Dio & "' AND kategorija>" & Kategorija
  31. 'selktuj iz tabele  tblShemaMontaze sve koji imaju u polju Idstroja vrijednost koju ima rs1 u polju 'IDDijela i da je kategorija veca od 1
  32. Set Rs2 = Db.OpenRecordset(SQL) podigni rs2 sa gornjim sql-om
  33. Do While Not Rs2.EOF ' petlja druga
  34.        Rs3.AddNew
  35.         For I = 1 To BrojKolona
  36.         Rs3.Fields(I) = Rs2.Fields(I - 1) ' ovo je sve isto kao i gore
  37. 'Predpostavljam da ovdje treba mozda upisati u polje idstroja zadani idstroja a ne postojeci
  38.        Next I
  39. Rs3.Update' zapisi
  40. Rs2.MoveNext 'pomakni za jedan red rs2
  41. Loop 'Kraj druge petlje
  42. Rs2.Close  zatvori rs2 koji se motao u drugoj petlji
  43. Rs1.MoveNext 'pomakni rs1 za jedan red
  44. Loop 'kraj prve petlje
  45. Rs1.Close
  46. Rs3.Close
  47. Set Db = Nothing
  48. End Function

Evo ova ti procedura radi ono sto si na slici pokazao a i opisao sam ti svaki korak.
Jedino sto pretpostavljam da se prepisuje zadani idstroja gdje nadje da je id dijela jednak idstroja.

Ako si ti u svom query da ovaj isti uslov onda ti nije dobar query jer imas viska podataka u njemu.
Imas 27 podataka koji zadovoljavaju uslov po ulaznim parametrima
i imas jos 57 onih koji imaju iz ovih 27 iddijela upisan u idstroja
to je ukupno 84.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#43 30.12.2010 12:47
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Server i Access baza
Ovako stoje stvari.
Na dobrom si putu ali pošto imamo 5 kategorija O,1,2,3,4 mislim da treba ima ti 4 petlje.
Jer ako krenemo od Kategorija = 0 i naiđemo na IDstroja = IDdijela pod kategorija = 1, onda moramo gledati dali se opet njemu pripadajući IDdijela pojavljuje u koloni IDstroja i tako provjeriti sve do kategorija = 4
Pozdrav
↑  ↓

#44 30.12.2010 12:53
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,711


Predmet:Re: Server i Access baza
Netreba ti 5 petlji.
Pretpostavljao sam ja to kada si ti poceo pisati. Kategorije cemo rijesiti time sto cemo na pocetku ubaciti for petlju od 0 do 4. aizbaciti ulazni parametar kategorije.
Samo neznam kako ces rijesiti id stroja. Pretpostavljam da treba i zasve id stroja a ne za jedan i nisi mi odgovorio jel u id stroja prepisujes id dijela.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#45 30.12.2010 13:57
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Server i Access baza
Uvjek mora biti prepisan slog iz reda u kojem se petlja nalazi.

Kategorija IDstroja Index IDdijala kom
0 0001528 1 0000001 2 ' prepisat ovo
1 0000001 2 0000005 1 ' prepisat ovo
1 0000001 3 0000006 1 'prepisati
3 0000006 7 0000010 2 'prepisat

itd.
Pozdrav
↑  ↓

#46 30.12.2010 14:23
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,711


Predmet:Re: Server i Access baza
Da ali sto si ti ono radio kada nadjes red u kojem imas u polju id stroja isti ide kao u prvom iddijela onda si pisao zadani idstroja a ne ovaj koji je bio tu u toj celiji tog nadjenog reda.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#47 02.01.2011 08:23
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Server i Access baza
Dobro jutro, evo me ponovno.
Ona kolona IDstroja, može biti i zadani IDstroja, ali bitno je u koloni IDdijela dobiti sve pripadajuće elemente.
Da bi možda bilo jasnije Å¡to meni treba u Attachmentu Å¡aljem moju skraćenu bazu da vidiÅ¡ kako to radi.
Tamo imam tablice:
0_tblKombinacija
1_Stroj
2_Sklop
3_Podskl
4_cvor

i iz njih raznim koninacijama Querya i Funkcija izvlačim podatke koji na kraju budu složeni u tablici ShemaTransfer

Sada sam ja sve podatke iz gore navedenih tablica kopirao u novu tablicu tblShemaMontaze, nadajući se da će se iz tejedna tablice na jednostavniji način moči izvuči podaci u tablicu tblShema u kojoj bi trebali biti isti bodaci kao u staroj tablici tblShemaMontaze.

Prilozi:
Informacije o tipu datoteke za:rar  Proces.rar
Preuzimanja:179
Velicina datoteke:285.76 KB

Pozdrav
↑  ↓

#48 02.01.2011 11:38
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,711


Predmet:Re: Server i Access baza
Da vidim jesmo li se razumjeli.
Ti hoces kada odaberes neki stroj da sve njegove elemente sklopove podsklopove cvorove itd.. iz ovih tablice prebacis u neku novu tabelu.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#49 02.01.2011 12:06
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Server i Access baza
To hoču.
Ali i kada odaberem samo sklop da onda dobijem njegove elemente
ili odaberem samo podsklop pa dobijem njegove elemente.

tblKombinacija mi služi da mogu lansirati naloge za više strijeva odjednom.
Pozdrav
↑  ↓

#50 02.01.2011 12:56
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,711


Predmet:Re: Server i Access baza
To smo gore i razmatrali i napisao sam sta ti je ciniti.
Sad ti meni reci da ja nebi nabasavao.
Sta pises u sledecim poljima:
Tabela: stroj
Polje:Indexsklop
Tabela: Sklop
Polje: IndexPodsklop
Tabela: Podskl
Polje:InedexCvor
Tabela:Cvor
Polje:Indexoz

Pored ovoga napisi mi hijerarhiju odnosno sta cemu pripada. To si gore negdje naveo ali da ne trezim:
Jeli redosled ovakav:
Stroj
Sklop
Podsklop
Cvor
pozicija

Jeli ovo ispravan redosled.
Hocu reci jeli stroj moze imati vise sklopova podsklopova cvoraova i pozicija
Jeli sklop moze imati vise podsklopova pozicija cvorova a nemoze imati niti jedan stroj itd.
Znaci samo redosled.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

Stranice (22):1,2,3,4,5,6,7 ... 21,22

Srodne teme

Ko je online?

Aktivni clanovi:
nema clanova


Kontakt
Sva vremena su GMT +01:00. Trenutno vrijeme: 6: 19 am.