Pocetnicko pitanje

Pocetnicko pitanje

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.
offline
  • sone 
  • Novi MyCity građanin
  • Pridružio: 13 Mar 2004
  • Poruke: 5

Pоkušaj sa ovim.
Korišćen je DAO, pa ako ti nije uključen onda Microsoft Visual Basic >> Tools >> References - Microsoft DAO 3.6 Object Library.
mycity.rs/must-login.png



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.

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 Smile

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.

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 !

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!

Ko je trenutno na forumu
 

Ukupno su 747 korisnika na forumu :: 30 registrovanih, 4 sakrivenih i 713 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3028 - dana 22 Nov 2019 07:47

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: _Sale, aleksmajstor, aljosa7, bato, Braca75, branko72, cicus91, Cufo, dejan__81, dogodine, dozorni, girici3, ikan, ivica976, kalens021, kovinacc, ladro, Lieutenant, Marko Marković2, Mercury2, miljannis, pein, proka89, royst33, sovanova95, stalker2, suton2, tomigun, Vexon, Yellow Pinky2