[es] - Potrebna mi je pomoć u radu sa formom u MS Accessu

Sancho
Bajric Sanel
Cazin

Član broj: 24687
Poruke: 23
80.65.81.*

Profil

Potrebna mi je pomoć u radu sa formom u MS Accessu

^{13.06.2004. u 13:23 - pre 246 meseci}

Pozdrav ljudi

!
Zapeo sam na jednom mjestu, i ne mogu rijesiti jedan problem, ma koliko pokusavao.
Evo o cemu se radi:

Pravim bazu podataka, koja izmedu ostalog sadrzi tabelu, npr KUPCI, u kojoj se nalaze potrebni podaci o kupcima, npr:
SIFRA KUPCA
NAZIV
ADRESA
GRAD
itd...

E sad, napravio sam formu RACUN, koj sluzi za kreiranje racuna iz podataka u bazi.
Naravno, na racunu mora biti naziv kupca sa ostalim podacima o njemu.

E sad je pitanje, kako da napravim nesto na toj formi, npr. COMBO BOX koji u sebi sadrzi SIFRE KUPACA, i kada odaberem bilo koju sifru iz tog combo boxa, da mi automatski popuni na formi ostale TEXT BOX-ove sa ostalim podacima kupaca, tj.

Ako mi je pod sifrom npr. 0001 kupac pod nazivom Smith
kad odaberem na formi iz combo boxa tu sifru, da mi automatski napise na formi i ostale podatke: naziv, adresu, grad itd.

Znam da je ovo jedino mjesto gdje mogu potraziti pomoc, i da vam ovo nece vjerovatno predstavljati problem, pa vas molim za pomoc, jer vec cupam kosu sa glave, a dosadilo mi je unositi podatke "pjesice".

Hvala vam unaprijed

Sancho

Odgovor na temu

Mauzer
Beograd

Član broj: 17183
Poruke: 23
*.ptt.yu

Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{13.06.2004. u 14:58 - pre 246 meseci}

I mene to muci bash

Valjda ce nam neko objasniti.

Odgovor na temu

drbogi

Član broj: 5045
Poruke: 601
*.vdial.verat.net

ICQ: 454238854

+3 Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{13.06.2004. u 16:40 - pre 246 meseci}

Imate primer u Northwindu forma Orders.

Odgovor na temu

Mauzer
Beograd

Član broj: 17183
Poruke: 23
*.ptt.yu

Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{13.06.2004. u 21:37 - pre 246 meseci}

E bas sam tu formu gled'o i nisam nigde video na koji nacin povlaci kompletne podatke iz jednog zapisa na osnovu primarnog kljuca. Ajde nek nam neko kaze u cemu je caka

Odgovor na temu

drbogi

Član broj: 5045
Poruke: 601
*.vdial.verat.net

ICQ: 454238854

+3 Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{13.06.2004. u 23:06 - pre 246 meseci}

Pa u Orders tabeli imas lookap polje (CustomerID), koje trazi customera, kao spoljni kljuc...

Odgovor na temu

krul
Cardak ni na nebu ...

Član broj: 16060
Poruke: 85
*.bchsia.telus.net

+1 Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{14.06.2004. u 00:55 - pre 246 meseci}

Ne znam kako stojis sa VBA, ali otprilike bi to islo ovako. (Ako sam te dobro razumio).
Treba da napises malo koda u Change event Kombo boksa. Tada svaki put kad korisnik napravi promenu selekcije u kombo boksu ti lepo taj dogadjaj event "trap" uhvatis u tom kodu pogledas ID ili sifru tog racuna koji je naravno u skrivenoj koloni i izvrsis upit na zadati ID.
Npr.
Private cbo_Change_event
Dim rs as recordset
dim db as database
dim sql as string
dim ID as integer

id = cbo.column(1).value
db = currentdb
sql = "select * from tablaKorisnici WHERE korisnikID =" & ID
set rs = db.openrecordset(sql)
'Sad sve podatke imas u rekordsetu
'sad samo popuni text boxove refrencirajuci imena polja u recordsetu

if not rs.eof then
rs.movefirst
me.txtboxKorisnik_IMe = rs(KorisnikIme).value
me.txtboxKorisnik_Prezime= rs(KorisnikPrezime).value
end if

end if

Evo to je otprilike to
Pisao sam napamet tako da su moguce greske u sintaksi ali sam siguran da je ceo koncept ispravan, i da cela stvar treba da radi kako sam naveo.

Puno srece

Jednostavnost! Odlika genijalnosti

Odgovor na temu

drbogi

Član broj: 5045
Poruke: 601
*.vdial.verat.net

ICQ: 454238854

+3 Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{14.06.2004. u 05:45 - pre 246 meseci}

To radi ovaj event, popunjava polja ship to na desnoj strani forme,

Private Sub CustomerID_AfterUpdate()
' Update ShipTo controls based on value selected in CustomerID combo box.
Me!ShipName = Me![CustomerID].Column(1)
Me!ShipAddress = Me!Address
Me!ShipCity = Me!City
Me!ShipRegion = Me!Region
Me!ShipPostalCode = Me!PostalCode
Me!ShipCountry = Me!Country

End Sub

ali, u isto vreme zahvaljujući tome što je qryOrders osnova za formu bivaju popunjena i disable polja sa leve strane (ispod cmbCustomerID polja). Ukoliko ti je samo to potrebno, napravi query za svoju formu, umesto tabele.

Odgovor na temu

Sancho
Bajric Sanel
Cazin

Član broj: 24687
Poruke: 23
80.65.81.*

Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{14.06.2004. u 12:38 - pre 246 meseci}

E, "drbogi" hcvala ti, napravio sam query, postavio VB kod, i radi, ali... :(, sdesava se nesto cudno. Npr. u tabeli, odnosno query imam npr. 5 firmi, kad odaberem sifru firme jedan, on mi da podatke o njoj, i to je ok, ali kad idem da odaberem sifru 2 i dalje, on mi i dalje osrtavlja podatke od firme jedan, a mna dnu forme imam ona standardna dugmad za navigaciji, i ona na FORMI pokazuju da moram ici na record npr 2 i kad odem na rec 2, kad iz combo-a odaberem sifru 2 on mi da podatke o firmi pod tom sifrom, i tako do kraja.
Dakle ima negdje greska , ali gdje?????

POMOZIII!!!!

Sancho

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.eqao.com

+79 Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{14.06.2004. u 14:25 - pre 246 meseci}

Oba resenja koriste unbound kontrole za podatke o kupcu. Jasno kao dan - odaberes kupca, a onda se njegovi podaci prepisu u unbound polja. Pretpostavljam da neces podatke o kupcu da cuvas u tabeli Racuni, osim Kupac_ID.
Posto su polja unbound, kad predjes na novi rekord, ta polja zadrzavaju stare vrednosti, koje si postavio u prethodnom rekordu. Treba znaci nekako isprazniti ta polja pri prelasku ne novi rekord. Mozes da koristi formin OnCurrent event , ovako otprilike:

Code:

Private Sub Form_AfterUpdate()
' Update ShipTo controls based on value selected in CustomerID combo box.
'Clear the values
   Me!ShipName = NULL
   Me!ShipCity = NULL
   Me!ShipRegion = NULL
   Me!ShipPostalCode = NULL
   Me!ShipCountry = NULL
End Sub

Ovaj kod se komlikuje kad hoces da na postojecim rekordima visis podatke o Customerima. Treba na OnCurrent odvojeno posmatrati New i Existing records itd..

Medjutim, postoji resenje koje ne zahteva programiranje uopste. Za svako od zelenih polja postavis po jedan combo box na formu:
cboShipName, cboShipCity, cboShipRegion, cboShipPostalCode itd.
Svi imaju DtaSource = CustomerID (postali su bound polja)
Za njih stavis sve da je RowSourceType=Table/Query i neka budu ovo RowSource properties:
cboShipName RowSource = "SELECT CustomerID, ShipNAme FROM tblCustomers"
cboShipCity RowSOurce = "SELECT CustomerID, ShipCity FROM tblCustomers"
cboShipRegion RowSource= "SELECT CustomerID, Shipregion FROM tblCustomers"
Onda za svaki od ovih combo boxova postavis
Column Count=2,
Column Widths = 0;4
Column widths ce da sakrije prvu kolonu a da prikaze DRUGU, sa informacijom koja tebi treba.
Jos treba da postavis na sve ove combo boxove Locked=TRUE, da ih ne bi koristo za biranje. Glavni, cboCustomer osatvi kakav je bio - iz njega biras svog Customera.

Kad se pomeris na sledeci rekord, ako je novi rekord, svi cbo ce biti prazni (ono sto ti treba ;). Kad potavis formu na neki postojeci rekord, videces sve podatke za odgovarajuceg Customera.

Broj linija programskog koda = 0.

Ako ti trebaju podaci o ustomeru na print kopiji racuna, mozes da uradis isto. Combo boxovi se na papiru vide kao text boxovi. A mozes da u report source query dodas kolone koje ti trebaju (JOIN query) i odstampas ih u nekoj header sekciji racuna.

Nemoj slucajno da pomislis da stampas formu direktno. Odmah cemo da te vratiom u beznadezne pocetnike.

;-)

Odgovor na temu

Sancho
Bajric Sanel
Cazin

Član broj: 24687
Poruke: 23
80.65.81.*

Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{16.06.2004. u 12:59 - pre 246 meseci}

EZidar, tvoji odgovri me uvijek oraspoloze, a sto je najsmjesnije, kad god mi odgovoris, ja skontam i jos jedan nacin :)

Naime, uradio sam to da sam uzeo combo box pridruzio ga vrijednosti ID kupca, a zatim postavio tex boxove boundovane na zeljene recordse.

pri postavljanju comba, wizard meje pitao da li zelim da combo odreduje ostale podatke koji odgovaraju ID odr. seta, i ja kliknuo YES hahahaah.

I fakat, sad kad god odaberem vrijednost iz cmboa, on mi odabere u boundovanim tex box sve ostale vrijednosti tog recorda, a sto je najbolje, report je jednostavan, bez calc contr, i sli, vec obican.

U svakom slucaju, tvoja me rijesenja uvijek nadahnjuju.
Hvala jos jednom!

Sancho

Odgovor na temu

drbogi

Član broj: 5045
Poruke: 601
*.vdial.verat.net

ICQ: 454238854

+3 Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{16.06.2004. u 13:13 - pre 246 meseci}

Pa mislim da nema potrebe da budeš ciničan, čovek je hteo da ti pomogne i fakat potrošio vreme da ti napiše. Sad ni ja baš iz prve nisam uspeo da shvatim u čemu je tvoj problem. U svakom slučaju nije lepo biti nezahvalan, a dobro je što si rešio problem pa ubuduće i ti možeš nekome pomoći kada mu zapne.
Nemoj da se ljutiš, a ako sam pogrešno protumačio tvoj post, izvinjavam se unapred.

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.eqao.com

+79 Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{16.06.2004. u 13:57 - pre 246 meseci}

Havla ti drBogi u svakom slucaju na paznji.

Mislim da ipak nema frke nikave

i nema ljutnje. Nisam dobio utisak da je Sancho cinican ili bilo sta lose. Post sam shvatio pre kao pohvalu

Covek je primenio upravo ono resenje koje sam naveo, s jednim velikim unapredjenjem - upotrebio je wizard i tako mnogostruko skratio potrebno vreme. Ako je do tog resenja Sancho dosao sam, jos je bolje. Cilj ovog foruma nije da se ljudima ponude gotova definitivna resenja, nego ideje i da ljudi iz njih nesto nauce ili se podstaknu na razmisljanje i istrazivanje. U ovom se slucaju upravo to desilo i ja sam srecan zbog toga

Sancho ocigledno u sred nekog znacajnog stvarnog projekta i u tom procesu nailazi na probleme koje ponekad podeli s nama i onda od toga na kraju svi imamo koristi. Na kraju projekta, sancho ce znati mnogo vise nego ranije, ne zbog foruma, nego zbog iskustva, pa ce prestati da pita tako cesto ali ce verovatno poceti da odgovara na postove i pomaze drugima. Postace pravi majstor. A to smo upravo i hteli ovim forumom, zar ne?

Odgovor na temu

Sancho
Bajric Sanel
Cazin

Član broj: 24687
Poruke: 23
80.65.81.*

Profil

Re: Potrebna mi je pomoć u radu sa formom u MS Accessu

^{16.06.2004. u 14:30 - pre 246 meseci}

E Zidar, hvala ti :)
Naravno da nisam bio cinican, jer si mi do sada pomogao nemjerljivo rijecima, vjerovatno bih jos tapkao u mraku.
i ostalima se izvinjavam ako je moj post zvucao malo cinicno, ali stvarno bio je jedna zahvala, i nista drugo.
Nadam se da niste previse ljuti :)
Haj cao, od ko fol da nastavim sa radom

Sancho

Odgovor na temu