Poslao: 30 Sep 2005 09:18
|
offline
- Polke
- Novi MyCity građanin
- Pridružio: 29 Sep 2005
- Poruke: 14
|
Pozdrav svima,
Potreban mi je kod koji ce mi na formi Faktura u textbox Ukupno iz subforme Stavke sabrati sve vrednosti polja Iznos.
U pitanju je Access.
Hvala!
Dopuna: 30 Sep 2005 10:18
Hm, mozda nisam dobro objasnio sta mi treba, evo primera.
Znaci, na glavnoj formi u polju Iznos treba da mi sabere i upise sve vrednosti iz subforme iz polja Ukupno.
mycity.rs/must-login.png
|
|
|
Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
|
|
|
Poslao: 01 Okt 2005 14:27
|
offline
- Pridružio: 26 Mar 2005
- Poruke: 57
- Gde živiš: pAnČeVo
|
Polke odmah da ti odgovorim da ti je pitanje jednostavno ali da ima vise nacina da se to uradi u zavisnost kako si polje postavio u subformi u kojem sumiras vrednosti. Ako je to polje Unbound onde ce ti jod jedan mali Query pomoci da to uradis. Ako postoji polje u bazi u kojem sumiras vrednost iz subforme onda se samo kroz kod zadaje putanja sta da se sumira. ?!
Dopuna: 01 Okt 2005 15:27
Pogledao sam resenje koje ti je ponudio Sone, nije lose resenje samo ja to radim malo profesionalnije bez komandnih dugmadi sa malo vise automatike. Ali ako ti je pomoglo utoliko bolje, pozdrav za Sone i Polke od IIRS8.
|
|
|
|
Poslao: 01 Okt 2005 22:28
|
offline
- Polke
- Novi MyCity građanin
- Pridružio: 29 Sep 2005
- Poruke: 14
|
Pozdrav Sone i IIRS8,
To je otprilike ono sto mi treba, samo mi treba taj veci stepen automatike, znaci kad se record doda u subformi da se automatski sabere dole, znaci na Update. Polje postoji u bazi i zove se Iznos. Mozda ovo pitanje zaista zvuci apsurdno, ali nekom ko nije bio u kontaktu s a SQLom i VBom, vasa pomoc puno znaci
|
|
|
|
Poslao: 02 Okt 2005 07:30
|
offline
- sone
- Novi MyCity građanin
- Pridružio: 13 Mar 2004
- Poruke: 5
|
Pozdrav svima.
Kod, uz neznatnu modifikaciju, veži za događaj On Lost Fokus na polju Ukpno subforme i to je to.
Mada, komandno dugme ja uvek postavljam zbog operatera koji unose podatke, da još jednom, pre konačnog upisa u bazu, poprave eventualne greške prilikom formiranju fakture, pogešno uneta količina ili izabrana pogrešna vrsta robe, uneto jelen pivo 0,5 umesto 0,3 i slično.
|
|
|
|
Poslao: 03 Okt 2005 13:21
|
offline
- Pridružio: 26 Mar 2005
- Poruke: 57
- Gde živiš: pAnČeVo
|
U svakom slucaju iskustva i znanja se razlikuju od programera do programera. (Za Sone) - Kroz svoje iskustvo sam naucio da sve sto moze preko tastature, ide preko tastature. Gubitak vremena koristeci misa je od 0.5 do 2.5 sekundi puta broj ponavljanja = mnogo vremena. Posto Polke ima polje u bazi ja bih sve odradio u code-u i na primer na F5 bih izasao iz podforme i na izlasku bih se sumiralo sve sto treba, tako da meni komandno dugme ne zauzima mesta a princip provere tacnosti podataka je isti. Jer pre nego sto pritisne F5, proverice da li je sve dobro upisano. na kraju krajeva greske se desavaju u svakom slucaju. DAO (Data Active Object) 3.6 bih trebao da bude ukljucen obavezno. Polke napisacu ti code pa ti prepisi, potrudicu se da ti dam tacne instrukcije.
Dopuna: 03 Okt 2005 14:16
To mozes da postavis na OnExit iz SubForm-e
Dim vr As Double
vr = DSum("Ukupno iz SubForm", "SumQuery")
Me.Polje Ukupno iz Glavne forme = vr + Polje iz Ukupno glavne forme
End If
Napravi jedan mali SumQuery (Select query)u kojem ce kriterijum biti ID iz Glavne forme (Forms!GlavnaForma!PoljeID) i naravno u tom Query-ju ce biti polje (Ukupno iz SubForm).
Na Event - OnKeyDown subforme upisi
If keyCode=VbkeyF5 then
DoCmd.GoToControl""
End if
- izmedju navodnika ces upisati naziv polja iz glavne forme na koje zelis da skoci.
U svakom slucaju ako ti negde zapne javi! Posto si pocetnik dao sam ti resenje sa manje code-ova kako bih lakse razumeo.
Dopuna: 03 Okt 2005 14:21
Nadam se da sam ti pomogao! Ako nisam javi pa cu ti poslati jedan .mdb primer u svakom slucaju resicemo problem.
Pozdrav od IIRS8 !
|
|
|
|
Poslao: 04 Okt 2005 09:27
|
offline
- Polke
- Novi MyCity građanin
- Pridružio: 29 Sep 2005
- Poruke: 14
|
Hvala vam obojici,
Problem sam resio kao sto je sone napisao, ali bih voleo da vidim i taj primer sto ga spominjes- IIRS8.
Pozdrav!
|
|
|
|