kenan | 12.05.2015 12:54 |
---|---|
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 |
zxz | 12.05.2015 12:59 |
---|---|
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 |
zxz | 12.05.2015 13:18 |
---|---|
Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima De malo pojasni odakle pokreces ovaj kod. Citat: Moze biti samo jedan aktivni prozor pri izvrsenju. poenta je da na ostalim aktivnim prozorima koji imaju ovo polje uradi refresh |
kenan | 12.05.2015 13:23 |
---|---|
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 |
zxz | 12.05.2015 14:36 |
---|---|
Predmet:Re: Kako napraviti refresh ostalim aktivnim prozorima Citat: Ako ovo radi onda moze biti da ti u tom trenutku nije aktivna ta forma nego neki drugi objekat.'Forms![FSEME]![IDZahtjev] = Null 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. |
kenan | 12.05.2015 17:00 |
---|---|
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: primjer.rar (Velicina datoteke:33.97 KB) |
zxz | 12.05.2015 20:21 |
---|---|
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. |
kenan | 12.05.2015 20:45 |
---|---|
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 |
kenan | 12.05.2015 21:45 |
---|---|
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: formname.rar (Velicina datoteke:105.85 KB) |
zxz | 12.05.2015 23:06 |
---|---|
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 |