Centar za edukaciju-BiH


Stranice (2):1,2

#1 11.12.2010 19:59
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Listanje izvjestaja sa forme ??
pokušavam listati izvještaj u Preview formi s nevezanom formom
slika u prilogu

Slicice prilozenih slika:
bound.JPG
Tip datoteke:Informacije o tipu datoteke za:jpg jpg
Preuzimanja:366
Velicina datoteke:53.52 KB
Velicina slike: 1401 x 868 Pikseli

Ovaj post je ureden 1 puta. Posljednja izmjena 16.12.2010 16:42 od strane zxz. ↑  ↓

#2 11.12.2010 21:29
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Jel se može ovo ??
Ako sam te dobro razumio:
Imas formu i imas izvjestaj. Ti bi da listas izvjestaj sa ove forme.
Reci ako sam u pravu. Ako nisam morat ces bolje pojasniti. Bar meni nije jasno.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#3 11.12.2010 21:39
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Re: Jel se može ovo ??
"Da" forma kontolira stranice izvještaja koji je u Preview modu
↑  ↓

#4 12.12.2010 00:20
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Jel se može ovo ??
Na dugmic naprijed on klik:
PreuzmiIzvorni kôd (Visual Basic):
  1. Dim Rpt As Report
  2.  
  3. Set Rpt = Reports![ImeIzvjestaja]
  4. Me.Visible = False
  5. Rpt.Visible = False
  6. Rpt.Visible = True
  7. SendKeys "{RIGHT}", True
  8. Me.Visible = True

Za nazad samo
SendKeys "{LEFT}", True
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#5 12.12.2010 01:04
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Re: Jel se može ovo ??
Hvala Kako jednostavno i efikasno a aj ubio glavu
↑  ↓

#6 12.12.2010 01:38
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Jel se može ovo ??
Neznam zasto ti treba?
Mozda dodas jos ovo ako nije fit onda ti nece raditi.
Dim Rpt As Report

Set Rpt = Reports![ImeIzvjestaja]
Me.Visible = False
Rpt.Visible = False
Rpt.Visible = True
SendKeys "%{Z}", True
SendKeys "{RIGHT}", True
Me.Visible = True

Da i da napomenem za prvi i zadnji ti je end i home.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#7 12.12.2010 01:43
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Re: Jel se može ovo ??
ima li još koji pa da napravimo pjesmicu
↑  ↓

#8 12.12.2010 01:48
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Jel se može ovo ??
Hehe ne kontam te ali ima kod da napise tvoj kod.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#9 12.12.2010 03:21
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Re: Jel se može ovo ??
PreuzmiIzvorni kôd (Visual Basic):
  1. Public Sub OnNavigateRecord(ctl As IRibbonControl)
  2. On Error GoTo errorhend
  3.     Dim prov As Object
  4.    Dim prova As Variant
  5.   Set prov = Screen.ActiveReport '(acHiddenCurrentPage)
  6. prova = prov.count '''''''''''''''' to moras nac
  7.    Select Case ctl.ID
  8.     Case "btnDesno": SendKeys "{RIGHT}", True
  9.     Case "btnLijevo": SendKeys "{LEFT}", True
  10.  Case "btnPocetak"
  11.        Do Until prova = 0
  12.             prova = prova - 1
  13.             SendKeys "{LEFT}", True
  14.             Loop
  15.             SendKeys "%{Z}", True
  16. Case "btnkraj"
  17.         Do Until prova = 0
  18.             SendKeys "{RIGHT}", True
  19.             prova = prova - 1
  20.         Loop
  21.           SendKeys "%{Z}", True
  22. End Select
  23.  
  24. Exit Sub
  25. errorhend:
  26.  MsgBox "Koncentracije malo...  ", vbCritical, "Upozorenje"
  27. End Sub
Ovaj post je ureden 1 puta. Posljednja izmjena 12.12.2010 09:27 od strane zxz. ↑  ↓

#10 12.12.2010 03:24
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Re: Jel se može ovo ??
Sve to kompjuteri izračunavaju ... .. .. ... .. . .
↑  ↓

Stranice (2):1,2


Sva vremena su GMT +01:00. Trenutno vrijeme: 8: 25 pm.