[es] - Osvezavanje subformi

mpaja
Loznica

Član broj: 85296
Poruke: 9
89.216.85.*

Profil

^{03.04.2008. u 20:11}

Pokusacu ukratko da opisem nastalu situaciju i problem vezan za istu:

u bazi postoji tabela sa vezama prema vise na detalje koji su vezani za glavnu tabelu. Zelja je da se kretanjem kroz glavnu tabelu i prikazivanjem podataka na CONTINUS formi prikazuju i ostali podaci vezani za pojedinacni rekord. Kvaka je da nije moguca veza CHILD/PARENT ako je prva forma tipa CONTINIUS!

Elem, to je reseno na sledeci nacin:

1. Napravljena je forma Nosac koja nema data recordset i na istoj su kreirani text boxovi koji su kljucevi za vezu
2. Kreirane su dve Subforme, Subforma1 tipa CONTINIUS koja prikazuje podatke iz glavne tabele i Subforma2 koja prikazuje detalje vezane za rekorde iz Subform1. Text box za vezu se azuriraju na On Current iz Subform1 prenosenjem kljuceva.
3. U Subform2 je moguce neke podatke promeniti dok u Subform1 se isti pregledaju bez izmene. Ako se neki podaci promene u Subform2 oni izazivaju neke promene na Subform1 (promene tipa prekoracio si rok, prikazi zuti karton na tom rekordu i sl.). Prebacivanje sa jedne na drugu formu je misem.
4. Sve odlicno radi osim jedne sitnice: kada se izvrsi promena u Subform2 nece da uradi refresh Subforme1 da bi se pojavio onaj zuti karton! Probano na razne dogadjaje (On got focus, on after update i sl ali uporno odbija saradnju)

Ukoliko neko ima ideju bilo bi zgodno da je iznese

Hvala

^{03.04.2008. u 20:11}

mpaja
Loznica

Član broj: 85296
Poruke: 9
89.216.85.*

Profil

Re: Osvezavanje subformi

^{07.04.2008. u 16:51}

Privremeno rersenje.

Na event On Timer na svakih 15 sekundi osvezavati formu.
U Subformi1 dodati

Sub Form_Load()
Me.TimerInterval=15000
End Sub

Sub Form_Timer()
Dim crit as string
Dism rstTemp as recordset

crit="PredID=" & uslov

Me.Requery

Set rstTemp=Me.RecordsetClone

rstTemp.Findfirst crit

If rstTemp.Nomatch Then
IfrstTemp.BOF or rstTemp.EOF then
Else
rstTemp.MoveFirst
EndIf
EndIf

Me.bookmark =rstTemp.Bookmark
End Sub

Ovo radi. Ono sto ne valja je da ako se nesto menja / podaci u Subform2 do se mora uraditi brzo, u roku od 15sec. Moze se produziti interval osvezavanja tako sto ce se povecati Time interval na recimo 60000 sto znaci da se na svakih 1 min izvrsava osvezavanje forme Subform1.

Ako ima nesto pametnije, molim za pomoc.

Hvala

^{07.04.2008. u 16:51}

lukeguy
Novi Sad

Član broj: 46545
Poruke: 296
77.46.166.*

Profil

Re: Osvezavanje subformi

^{07.04.2008. u 17:28}

nešto mi je to mnogo komplikovano rešenje. sigurno je moguće prikazivati detalje u dve forme na neki jednostavniji način. u Northwind.mdb imaš primer. otvori formu Customer Orders i videćeš kako je to tamo rešeno.

i ne razumem kako ti AfterUpdate ne radi. on radi za svaku kontrolu posle promene sadržaja.

^{07.04.2008. u 17:28}