Centar za edukaciju-BiH



#1 12.05.2015 11:54
kenan Van mreze
Clan
Registrovan od:10.02.2011
Postovi:191


Predmet:Kako napraviti refresh ostalim aktivnim prozorima
imam mali problem

prije na 2003 mi je ovo radilo

Public FORMNAME As String

DoCmd.Close
FORMNAME = Screen.ActiveForm.Name

Forms![" & FORMNAME & "]![IDzahtjev] = Null
Forms![" & FORMNAME & "]![IDzahtjev].Requery
poenta je da na ostalim aktivnim prozorima koji imaju ovo polje uradi refresh

u suprotnom trebam izlaziri iz maski i ponovo unositi podatke
↑  ↓

#2 12.05.2015 11:59
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima
Public FORMNAME As String

DoCmd.Close ' Zatvara aktivni objekat ako je to forma a vjerovatno jeste onda ce je zatvoriti i neznam zasto ce ovaj dio koda.
FORMNAME = Screen.ActiveForm.Name ' Ime aktivne forme

Forms![" & FORMNAME & "]![IDzahtjev] = Null ' Upisuje null u polje Dzahtjev na aktivnoj formi ako ima to polje na njoj.
Forms![" & FORMNAME & "]![IDzahtjev].Requery
poenta je da na ostalim aktivnim prozorima koji imaju ovo polje uradi refresh
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#3 12.05.2015 12:18
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima
De malo pojasni odakle pokreces ovaj kod.
Citat:
poenta je da na ostalim aktivnim prozorima koji imaju ovo polje uradi refresh
Moze biti samo jedan aktivni prozor pri izvrsenju.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#4 12.05.2015 12:23
kenan Van mreze
Clan
Registrovan od:10.02.2011
Postovi:191


Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima
docmd.close nije bitno gdje će biti

Forms![" & FORMNAME & "]![IDzahtjev] = Null ' Upisuje null u polje Dzahtjev na aktivnoj formi ako ima to polje na njoj. - ovo je bitno jer koristim opciju On Not in list jer drugačije blokira

Pitanje je kako doči do naziva svih u tom trenutku aktivnih Formi - moželi ovo uopšte

'Forms![FSEME]![IDZahtjev] = Null
'Forms![FSEME]![IDZahtjev].Requery

ovako radi super al na jednu formu striktnu

morao bih if-ova napraviti kilometar
↑  ↓

#5 12.05.2015 13:36
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima
Citat:
'Forms![FSEME]![IDZahtjev] = Null
'Forms![FSEME]![IDZahtjev].Requery
Ako ovo radi onda moze biti da ti u tom trenutku nije aktivna ta forma nego neki drugi objekat.
napr. ako si otvorio modul pa pokrenuo ovo activni objekt ce biti modul a ne forma.
Ukoliko kod pokreces sa imenovane forme a svi ostali objekti zatvoreni, trebalo bi da radi.
Mozda da zakacis primjer pa cemo to brzo rijesiti.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#6 12.05.2015 16:00
kenan Van mreze
Clan
Registrovan od:10.02.2011
Postovi:191


Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima
logika ovih maski je u tome da kad se otvori maska Fseme i krene kreirati sema za knjiženje i zafali recimo konto, pozivam masku kontnog plana unesem novi konto, ugasim masku ali na polje konta nije refresirano.

e ja bi da se refresira ali mi ne ide

backend je sql pa je nezgrapno za slanje

ako treba nešto ću skrpit

Prilozi:
Informacije o tipu datoteke za:rar  primjer.rar
Preuzimanja:353
Velicina datoteke:33.97 KB

↑  ↓

#7 12.05.2015 19:21
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima
Na formi FKontniPlan an on close upisi ovaj kod.
Private Sub Form_Close()
Forms![FSeme]![IdKonto].RowSource = Forms![FSeme]![IdKonto].RowSource
Forms![FSeme]![IdKonto] = Me.ID
End Sub

Vjerovatno si pokusavao da ovo napravis na got fokus forme Fseme da nebi pisao na vise kodnih formi.
Ovako to radi dobro, samo ako sam dobro polja nabo jer nema tabela.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#8 12.05.2015 19:45
kenan Van mreze
Clan
Registrovan od:10.02.2011
Postovi:191


Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima
hvala ali to nije to što mi treba

ja ustvari imam više različitih formi iz kojih se poziva forma FKontniPlan i svugdje koristim koristim on not in list za otvaranje šifrarnika, probavao fokusom al neide jedino kako radi iz aktivne forme (npr Fseme) je preko on exit ali ne uvjek zato sam pokušavao preko Screen.ActiveForm.Name ali sam kasnije skonto da ste bili upravu jer sam ga koristio iz modula.

nikako ne kontam
↑  ↓

#9 12.05.2015 20:45
kenan Van mreze
Clan
Registrovan od:10.02.2011
Postovi:191


Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima
ovo je poruka kad ovo pokrenem

Public formname As String
Function IDKontoOsvjezi()
Dim formname As String
formname = Screen.ActiveForm.Name
Forms![" & formname & "]![IDKonto] = Null
Forms![" & formname & "]![IDKonto].Requery

End Function

da negriješim kod navodnika ada sam probao i sa apostrofom

Prilozi:
Informacije o tipu datoteke za:rar  formname.rar
Preuzimanja:377
Velicina datoteke:105.85 KB

↑  ↓

#10 12.05.2015 22:06
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima
Prvo moras pobrisati jednu od varijabli koja se zove formname ili ovu inad publikovanu ili u okviru same procedure.
Dvije iste nemogu biti.
dalje ide:
Dim formname As String

formname = Screen.ActiveForm.Name
Forms(formname).IdKonto.requery
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

Stranice (2):1,2


Sva vremena su GMT +01:00. Trenutno vrijeme: 3: 31 am.