Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190
iCentar » Racunari i oprema » Programirannje i baze podataka » Access » Problem sa uredjivanjem Reporta
pmiroslav 17.05.2012 07:44
Predmet:Re: Problem sa uredjivanjem Reporta

Evo ga moj primjer
Prilozi:
ProimjerRaport.rar (Velicina datoteke:56.43 KB)

Trtimir 17.05.2012 07:45
Predmet:Re: Problem sa uredjivanjem Reporta

zato ti ne radi što ti je brojač uvijek 1. , 5 puta nanovo otvaraš report

1. Brojač stavi u MODULES i i reci mu da je PUBLIC
2. U VBA kodu (reporta) izbaci Brojac=brojac +1 , i onu gornu deklaraciju
3. na pozivu reporta
Private Sub Command31_Click()

Dim kolicina As Integer
Dim stDocName As String
brojac=0
kolicina = 5
stDocName = "rptSkladisniDoc"
For kopija = 1 To kolicina
brojac=kopija
DoCmd.OpenReport stDocName, acViewNormal
Next kopija
End Sub

Eto sad probaj

Pozdrav

pmiroslav 17.05.2012 08:03
Predmet:Re: Problem sa uredjivanjem Reporta

Napravio sam kako si rekao i sad mi mjenja naslove, ali prvi mi počinje od
Case 2
Print "Skladište primatelja"

a na zadnjem, petom listi ne piše ništa.
Prilozi:
PrimjerRaport_2.rar (Velicina datoteke:72.06 KB)

zxz 17.05.2012 10:23
Predmet:Re: Problem sa uredjivanjem Reporta

Posto si proceduru stavio na PageFooterSection onda ovo:
Brojac = Brojac + 1
ide na kraj procedure odnosno nakon end select

U ovom slucaju ce ti se pojavljivati na svim stranicama pod uslovom da imas vise stranica.

pmiroslav 17.05.2012 10:29
Predmet:Re: Problem sa uredjivanjem Reporta

Hvala ZXZu i Trtimiru, sada je OK.

zxz 17.05.2012 11:00
Predmet:Re: Problem sa uredjivanjem Reporta

E nij ok.
Ja nisam ni gledao da si var brojac prenio u modul modbrojevidokumenata.
E sta je tu problem sad.
Modul zadrzava vrijednost i nakon izlaska iz izvjestaja sto znaci kada bi ponovo htio stampati nebi vise radilo dok nebi izasao iz app. i ponovo usao.
Mozes to zakrpati ako stavis na on open izvjestaja ovo:
Brojac = 0
ili da vratis var brojac u modul izvjestaja.

pmiroslav 17.05.2012 11:46
Predmet:Re: Problem sa uredjivanjem Reporta

Prema sugestiji od Trtimira brojač mi se poziva i sa dugmeta za printanje

Dim kolicina As Integer
Dim stDocName As String
brojac=0
kolicina = 5
stDocName = "rptSkladisniDoc"
For kopija = 1 To kolicina
brojac=kopija
DoCmd.OpenReport stDocName, acViewNormal
Next kopija
End Sub

Pa ako brojač maknem tada mi tu javlja grešku

zxz 17.05.2012 13:52
Predmet:Re: Problem sa uredjivanjem Reporta

E nisam to vidio.
Tako ce raditi ispravno jer ga vracas na nulu pri svakom pokretanju.
Nije mi jasno da ti ne radi kada ga stavis na modul.
Ja sam probao kod mene i radi sve kako valja.
No dobro bitno je da radi mada to i dalje ostaje globalna variabla.

pmiroslav 17.05.2012 14:21
Predmet:Re: Problem sa uredjivanjem Reporta

Bio je izgleda problem što sam u svojoj originalnoj bazi u jednom modulu imao još jednu varijablu koja se zove Brojac, sada sam je preimenovao i sve radi kako treba.

zxz 17.05.2012 15:07
Predmet:Re: Problem sa uredjivanjem Reporta

Ok .
Jeste sigurno je do toga bilo.
Samo ima ovdje jos nesto sto bi ja drugacije napravio a to je broj kopija.
Nije mi jasno sta radis ali sam postavio primjer u arhivu kako se moze setovati printer pa ces ti sigurno naci za sebe sta ti treba.