Centar za edukaciju-BiH


Stranice (2):1,2

#1 27.08.2016 08:17
Registrovan od:22.03.2012
Postovi:139


Predmet:Iz kolone u niz
Pozdrav za sve na forumu.

Poceo sam izradu jedne baze za potrebe kolega koji vrše inspekcijski regled. U jednom izveštaju potrebno mi je da u zadanu formu Naloga ubacim i inspektore koji idu u pegled. Našao sam više primera na natu i nešto napravio ali bih poleo to još malo doraditi popraviti.

- Napravio sam privremenu tabelu tblINSEKTORI_NAPREGLEDUtmp jer ne znam kako da selektujem inspektore za konkretn pregled

Set rst = db.OpenRecordset("SELECT Prezime_Ime " & _
" FROM tblINSPEKTORI_NA_PREGLEDUtmp")

Kako bez ove privremene tabele?

- Kako da izmedju pretposlednjeg i poslednjeg zapisa umesto zareza da umetnem slovo i.

Prilozi:
Informacije o tipu datoteke za:zip  Baza_Copy.zip
Preuzimanja:292
Velicina datoteke:69.55 KB

↑  ↓

#2 27.08.2016 08:19
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Iz kolone u niz
Evo i primer

Prilozi:
Informacije o tipu datoteke za:zip  Baza_Copy.zip
Preuzimanja:297
Velicina datoteke:69.55 KB

↑  ↓

#3 28.08.2016 11:02
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Iz kolone u niz
Ja sam pokusao ali mi bas nije jasno sta hoces odnosno jasno mi je sta hopces ali neznam iz koje tabele odnosno koje podatke i iz koje tabele hoces da prikazes u jednom redu.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#4 28.08.2016 15:00
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Iz kolone u niz
Iz tabele tblINSPEKTORI_NA_PREGLEDU, koja je u vezi sa tabelom tblPREGLED, poljem Broj_Predmeta, treba da u izveÅ¡taju prikažem niz kao Petrović Petar isprava broj 11111, Jovanović Jovan isprava broj 22222, stim da ako ima vise inspektora onda da umesto zareza između pretposlednjeg i poslednjeg bude i.
↑  ↓

#5 28.08.2016 16:40
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Iz kolone u niz
Kod stavi u neki modul.
PreuzmiIzvorni kôd (Visual Basic):
  1. Function Pregledi()
  2. Dim SQL As String
  3. Dim Db As dao.Database
  4. Dim Rs As dao.Recordset
  5. Dim Temp As String
  6.  
  7. SQL = "SELECT Prezime, Ime,Broj_Predmeta_Pregleda " _
  8.       & "FROM tblINSPEKTORI INNER JOIN tblINSPEKTORI_NA_PREGLEDU ON tblINSPEKTORI.JMBG_Inspektor = " _
  9.       & "tblINSPEKTORI_NA_PREGLEDU.JMBG_Inspektor"
  10. Set Db = CurrentDb
  11. Set Rs = Db.OpenRecordset(SQL)
  12. If Rs.RecordCount > 0 Then
  13. Rs.MoveFirst
  14. Else
  15. MsgBox "Nema Podataka"
  16. GoTo Kraj:
  17. End If
  18. Do While Not Rs.EOF
  19. Temp = Temp & Rs!Ime & "," & Rs!Prezime & "," & Rs!Broj_Predmeta_Pregleda & " i "
  20. Rs.MoveNext
  21. Loop
  22. Temp = Left(Temp, Len(Temp) - 3)
  23. Pregledi = Temp
  24. Exit Function
  25. Kraj:
  26. End Function
Napravi prazan izvjestaj i u njemu stavi samo jedno tekstualno polje.
Na tom polju stavi Can Grow i Can Shrink na yes.
Polje stavi dugo koliko hoces da ti bude sirina ispisa a sirina polja sto uza.
Na njega na kontrolsource napisi:

=Preglsedi()
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#6 28.08.2016 19:40
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Iz kolone u niz
I ja sam poceo odavde. Kod koji mi je poslužio za početak sličan je ovom. Ja sam u stvari napravio neko reÅ¡enje ali nije to to. Napravio sam privremenu tabelu koja se puni kada se otvori Continuous forma (jedina u primeru) frmSTAMPA_NALOGA_1 i kada se klikne na polje Poslovna jedinica, koji za vrednost polja Broj_Predmeta_Pregleda, Append kverijem napuni privremenu tabelu tblINSPEKTORI_NA_ PREGLEDUtemp a onda kodom koji je sličan tvom čita inspektore i to upiÅ¡e u polje rez odakle se to upiÅ¡e u Report gde je i ostali deo teksta. Ja bih hteo izbeći tu privremenu tabelu, to radi posao ali ako neko drugi radi to isto na drugom računaru onda će se privremena tabela popuniti i drugim podacima. Znači hteo bih da na formi frmSTAMPA_NALOGA_1, klikom na polje Poslovna jedinica, prikaze niz u izveÅ¡taja koji se otvara klikom na to polje kao Petrović Petar isprava broj 11111, Jovanović Jovan isprava broj 22222, stim da ako je jedan inspektor na pregledu piÅ¡e Petrović Petar isprava broj 11111 ako su dva inspektora na pregledu piÅ¡e Petrović Petar isprava broj 11111 i (umesto zareza slovo i) Jovanović Jovan isprava broj 2222 ako su tri inspektora na pregledu piÅ¡e Petrović Petar isprava broj 11111, Jovanović Jovan isprava broj 2222 i (umesto zareza slovo i) Simić Sima isprava broj 2222 itd
↑  ↓

#7 28.08.2016 20:06
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Iz kolone u niz
E sad neznam jesmam li uspio ili nisam.
Opisao si kako si ti radio a i vidio sam ja to tvoje ali sam pokuso napraviti kao sto si i napisao.
Znaci ispise sve predmete i napise imena inspektora na predmetu.
E sad mozda ti tu treba kao sto opisujes da ako ima jedan predmet vise inspektora da to izdvoji odnosno da napise jedan broj predmeta pa zatim imena inspektora.
Mozda tako treba neznam?
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#8 28.08.2016 20:18
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Iz kolone u niz
U tekstu mi ne treba broj predmeta. Tekst je podugačak, nisam hteo opterećivati njime, a ovo je samo jedan deo koji trebam ubaciti Petrović Petar isprava broj 11111 i ostale inspektore ako ih je viÅ¡e. Polje Broj_Predmeta_pregleda je veza za tabele tblPREGLED i tblINSPEKTORI_NA_PREGLEDU
↑  ↓

#9 28.08.2016 20:54
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Iz kolone u niz
Pa dobro to sam i napravio samo sto sam stavio broja predmeta umjesto broj isprave:
SQL = "SELECT Prezime, Ime,tblINSPEKTORI_NA_PREGLEDU.JMBG_Inspektor " _
& "FROM tblINSPEKTORI INNER JOIN tblINSPEKTORI_NA_PREGLEDU ON tblINSPEKTORI.JMBG_Inspektor = " _
& "tblINSPEKTORI_NA_PREGLEDU.JMBG_Inspektor"

i u kodu popravi ovo:
Do While Not Rs.EOF
Temp = Temp & Rs!Ime & "," & Rs!Prezime & "," & Rs!JMBG_Inspektor & " i "
Rs.MoveNext
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#10 01.09.2016 09:32
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Iz kolone u niz
Nisam bio u prilici javiti se ranije. Zakacio sam novi primer gde je malo više ilustrovano i napisano u samom reportu. Kada se otvori Report rptNALOG sa forme frmSTAMPA_NALOGA_1 mislim da je malo jasnije sa objašnjenjima. Pozdrav!
↑  ↓

Stranice (2):1,2


Sva vremena su GMT +01:00. Trenutno vrijeme: 12: 51 pm.