ACCESS : option buttons & podobrazac

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Ovo ce mozda zvucati nekom smesno, ali meni nije...izgubio sam zivce...

Da pojednostavim - problem je sledeci:

INTERAKCIJA OPTION BUTTON-A I PODOBRASCA

-Neka postoji tabela "Imenik", koja pored polja sa generalijama sadrzi i polje "Pol" koje moze da ima vrednosti "M" ili "Z".
-Neka se forma zove "Pretraga" napravljena "na prazno"
-Hteo bih da napravim Obrazac (Form) koji sadrzi PODOBRAZAC !
-Podobrazac se npr zove "SubPretraga", a generisan je iz osnovne(pocetne) tabele, a nalazi se u obrascu "Pretraga"
-Zelim da na glavnom Obrascu ("Pretraga")pored podobrasca postavim i option buttons "Selekcija"
-Option Buttons imaju 3 vrednosti : "SVI" "M" i "Z" (po defaultu stoji "SVI")
-Zelim da, kada izmenim vrednost "Selekcije" (Option buttons),
automatski se iz podobrasca izdvajaju samo polja koja imaju vrednost polja "M" (ili "Z") u zavisnosti sta se izabere...ili se ponovo prikazuju "SVI". (kao, primenjuje se filter)
----------------------------------
Kol'ko znam ovo moze da se resi za 4-5 (ili vise????) nacina ali ne znam kako - TACNO TREBA .....
1. preko funkcije applyFilter, koja moze da se smesti u MACRO ili
2. ili MODUL
3.da se napravi filter pa da se snimi kao QUERY, pa da se opet pozove..
4. Da se pozivaju funkcije SQL-a Funkcijom (valjda) RUN SQL
5.Da se naprave 2 upita koji izlistavaju prvi -samo "M", drugi samo "Z", pa da se opet kao nekako poziva iz VBA imi Macroa...
Treba uzeti u obzir da za "SVE" treba (valjda) koristiti RemoveFilter (ako se radi sa filterima)
----------------------------------
// -Problem koji me takodje interesuje je kako se u VBA predaje kontrola na podobrazac??? Da li treba koristiti neke funkcije (ili sta su vec) tipa "Recorset"..... //

Znam da ubacim podobrazac...to mi je jasno, ali pitanje se odnosi na interakciju Option buttons-a i podobrasca !!!!
----------------------------------
Sorry ako sam bio (malo?????? ) preopsiran.
Sva resenja su dobrodosla, pa ako neko zna i hoce da mi opsirno objasni
(po seljacki) (BAR) jedan nacin (najlaksi) koji radi !!!!

'FALA unapred, dobri ljudi !!!

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Razumem sta hoces da kazes, nije tesko samo treba biti malo kreativan. Ne znam koliko poznajes Access ali mislim da je najpametnije da se koristis kriterijumima sto u kodu a sto kverijima. ja sam to zamislio ovako........ POSTO SI PITANJE POSTAVIO PRE OKO 20 DANA, SAMO MI ODGOVORI DA LI TI JOS UVEK TREBA RESENJE? DA NE PISEM ZA dz.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Hvala sto se pojavio neko da mi pomogne...
Jesam, zainteresovan sam i dalje, jos kako...
Recimo da imam neki srednji nivo znanja ACCESS-a, dakle, upucen sam u sve osim u VBA, mogu da razumem kod (prilicno), ali ne znam sam da napisem nesto, a da to posle radi...

// molba - uputstvo: Ako hoces da mi pomognes, izberi (bar) 1 nacin, (najlaksi - najkraci) i to isteraj do kraja, posto su mi na jednom drugom forumu objasnjavali da " treba da stavis .....i ...., a kod ti ostavljam da sam napises..." Hvala mu, ali to ne resava moj problem
Znam ja to da uradim "peske", (npr Filter by selection), ali zelim da automatizujem to...
HVALA TI UNAPRED !!!

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

OK. Ako sam te dobro razumeo, uradices ovako!

U tabeli na sta ti se oslanja taj imenik dodaces polje -text- koje ce ti prakticno biti kriterijum, nazovi ga npr. MZSVE. Zatim to polje ces ubaciti u imenik kao ComboBox i u njegovom propertisu u Table/Query odabraces opciju Value List. A ispod u Row source ces upisati M;Z
Prilikom unosenja podataka moraces da odredis u ovom combobox-u sta je u pitanju M ili Z.
Posle ces da napravis drugu formu kako si je vec nazvao, valjda Selekcija u kojoj ces da ubacis tvoje polje MZSVE i na isti nacin mu ubaci preka Value list SVE;M;Z
Zatim napravi tri kverija, u prvom ce na polju MZSVE pisati u kriterijumu M u drugom kveriju istom takvom ce umesto M stajati Z , a u trecem nece stajati nista od kriterijuma, sto znaci SVE.
Napravi tri forme koje ce se oslanjati na te kverije, naravno svaki na po jedan kveri. Kad napravis forme, u formi Selekcija na polju MZSVE(ComboBox) u Event - AfterUpdate napisaces code.

if me.MZSVE = M then- ako prijavi gresku pokusaj sa "M"
docmd.openforms"Form1"- forma sa kverijem(kriterijum je M)
end if
if me.MZSVE = Z then
docmd.openforms"Form2"- forma sa kverijem(kriterijum je Z)
end if
if me.MZSVE= SVE then
docmd.openforms"Form3"- forma sa kverijem(bez kriterijuma)
end if

Ovo mi je prvo palo na pamet, ako budes imao nekih problema javi pa cemo resiti. Nadam se da sam ti pomogao!

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Нисам уопште добио обавештење о твојој поруци у e-mail-у, па нисам ни знао да си ми одговорио на питање -немам појма зашто ??!!!
Веома ценим твој одговор !!!!!!
// али, (увек има неко ''АЛИ'' )
//ако сам сконтао добро, ово што си написао из једне форме отвара другу форму која је направљена(ослања се) на један од 3 кверија....
// то је ОК, и то сам радио и пре на сличан/исти начин....па контам шта ми објашњаваш...
// е сад, моја жеља/замисао је била следећа:
// у оквиру једне форме имам још једну подформу(''Subform''). Е та подформа се ослања на целу табелу именика. Та подформа је направљена коришћењем визарда.
//У главној форми имам "Option group" - у облику RADIO BUTTONS (кружни дугмићи-када можеш да изабереш САМО ЈЕДНУ ОПЦИЈУ-дакле, НЕ КОМБО БОКС,НЕ КВАДРАТИћИ КОЈИ СЕ ШТИКЛИРАЈУ, НЕГО КРУЖИЋИ !!!!!! )
//3 опције - 3 кружића
//и сад, по дифолту стоји укључен на ''СВИ''. Када корисник обележи кружић испред ''м'' или ''ж'', тада се НЕ ОТВАРА НОВА ФОРМА (која се јели, базира на упиту ''м'' или ''ж'', него, У ОКВИРУ ИСТЕ ФОРМЕ да кажем, ''примењује филтер'' на подфому, и издваја САМО ОНЕ одговарајуће - ''м'' или ''ж''

// неки ''псеудо код'' за AFTER_UPDATE те OPTION GROUP-a би могао да изледа овако:

// 1.пренеси контролу на подформу
//2. покрени неки SQL код на подформу -
// DoCmd.ApplyFilter(SQL)

// ... или на неки сличан фазон

// трудио сам се да сада боље објасним.... ваљда сам успео...
// кад будеш био у могућности, одовори ми !
// ХВАЛА ТИ МНОГО НА ДОБРОЈ ВОЉИ ДА МИ ПОМОГНЕШ !!!!!

Dopuna: 02 Jun 2005 17:05

// @ IIRIS
//шта ти је судбина......
//решио сам проблем баш данас, и баш онако како сам замислио !!!!!!
//у сваком случају ХВАЛА МНОГО!!!!!!