Centar za edukaciju-BiH

Predmet:Otvaranje forme uz uslov

---

Hoću da iz forme frmPrometDugovi, gde imam subformu, otvorim drugu formu frmPrometPojedinacni, tako što kliknem na polje "NazivDobavljaca" u subformi i otvara mi se forma samo tog dobavljaca na kojeg sam kliknuo.
Stavio sam kod na polje NazivDobavljaca, na On click, ali mi ne radi.

DoCmd.OpenForm FormName:="frmPrometPojedinacni" _
, WhereCondition:="Dobavljac=" & Me!NazivDobavljaca

Prilozi:

Predmet:Re: Otvaranje forme uz uslov

---

Na formi frmpromet pojedinacni na comboboksu control source ostavi prazno, inace ces vrsiti izmjenu odataka.
Koliko sam te razumio taj ti kombo samo sluzi za pretragu.
Na on klik nazivDobavljaca stavi:
Dim a

a = Me.NazivDobavljaca
DoCmd.OpenForm FormName:="frmPrometPojedinacni"
[Forms]![frmPrometPojedinacni]![NazivDobavljaca] = a

samo i ovo ti je megalomansko rjesenje.
Moze se to i mnogo ugodnije i bolje napraviti.

---

Predmet:Re: Otvaranje forme uz uslov

---

Hvala radi, ne znam zašto onaj moj kod nije radio, kad na drugim sličnim mestima radi.
Ajde, znanja radi, ukratko samo opiši kako izgleda ugodnije i bolje rešenje,
pošto imam problem da ako je izvor subforme neki Union query, acces odbija da snim kod na On click na bilo kom polju subforme.

Predmet:Re: Otvaranje forme uz uslov

---

Prvo cu napisati zasto tvoj kod nije radio na ovome mjestu.

Ti si napisao
DoCmd.OpenForm FormName:="frmPrometPojedinacni" _
, WhereCondition:="Dobavljac=" & Me!NazivDobavljaca

Znaci imas:
Dobavljac=" & Me!NazivDobavljaca

Ovo ti je filter kji postavljas na formi medjutim ti na formi u recordsource imas tabelu tblDobavljaci koja i nema polje Dobavljac a i da ima opet nebi radilo jer ti se podaci iscitavaju u subformi i to na osnovu kriterija u combo boxu forme pa sam ja tu i upisao tvoj podatak i sve je proradilo.

Kako bi moglo bolje?
Opisat cu kako bi ja to napravio mozda ce biti naj jasnije.
subfrmDobavljaci treba napraviti kao konstrukcionu formu te na kraju reda dodati i taster napr. vidi promet ili tako nekako pa na on klik tog tastera prebaciti ovaj kod za podizanje druge forme.
Zasto konstrukciona forma?
U konstrukcionoj formi nazive kolona mozes napraviti sa komandnim tasterima pa se preko njih preslaguju podaci sto je onda veoma ugodno za pregledavanje a i ljepse izgleda.
Naravno i skrol bar vertikalni i jos sto sta da to profesionalnije izgleda.
E sad forma frmPrometPojedinacni koja opet imas subformu sto po meni nema razlog.
Mogla je biti samo forma a ako treba subforma onda ****lje da si je napravio pored subforme u ovoj formi sa koe podizes pa da se podaci mijenjaju na prelazak na novi rekord.

Podatke filtrirati je veoma lako po bilo cemo samo je bitno izdizajnirati lijepo a ja imam utisak da si ti pravio formu i subformu upravo radi toga.

---

Predmet:Re: Otvaranje forme uz uslov

---

Evo ovako nekao.
Ovo je samo primjer treba to lijepo dizajnirati.

Prilozi:

---

Predmet:Re: Otvaranje forme uz uslov

---

OK, nešto smo naučili, ali meni više odgovara da subfrmDobavljaci bude u datasheet obliku,
a jel imaš neko rešenje ako bi subfrmDobavljaci imao za source neki Union Query, tj read only query, koji ne dozvoljava snimanje koda u subfrm?

Predmet:Re: Otvaranje forme uz uslov

---

Vjerovatno si mislio na unos podataka u subfrmDobavljac.
na Property forme opcija recordset type stavi na Snapshot.

---

Predmet:Re: Otvaranje forme uz uslov

---

Ovaj kod otvara subfrmPrometPojedinacni

DoCmd.OpenForm FormName:="subfrmPrometPojedinacni", View:=3 _
, WhereCondition:="Dobavljac='" & [Forms]![frmPrometDugovi]![subfrmDobavljaci].[Form]![NazivDobavljaca] & "'"

Ja sam stavio da mi otvara frmPrometPojedinacni, koji je u Singl formi kako sam ga i napravio, ali kod mi stalno otvara u datasheet modu, pokušao sam da menajm ovo View:=3 _ , ali nikako da dobijem Singl form.

Predmet:Re: Otvaranje forme uz uslov

---

Nece ti to raditi na frmPrometPojedinacni radi uslova where jer na toj formi ne postoji polje dobavljac.
View:=1 je singl forma.

---

Predmet:Re: Otvaranje forme uz uslov

---

Promenio sam ja nazive pa radi, ali mi otvara form u datasheet modu, kada sam stavio View:=1
otvorio je, ali u Design view.