Newsgroup: it.comp.appl.access
Titolo: Casella di riepilogo dinamica

Salve. Ho un problema da risolvere. Ho una Tabella ed una 
CasellaDiRiepilogo, all'interno di una Maschera, che visualizza tutti i dati 
della Tabella.
In questa maschera ho l'esigenza di visualizzare i dati della Tabella 
all'interno della CasellaDiRiepilogo cliccando su un tasto che mi permette, 
attraverso i dati di 5 caselle combinate ke si trovano dentro la Maschera, 
di filtrare i dati della Tabella e visualizzarli nella CasellaDiRiepilogo.
Il problema sta nel fatto che non necessariamente devono essere presenti 
tutti e 5 i filtri (in qusto caso l'operazione richiedeva una sola 
istruzione), ma posso ad esempio filtrare i dati attraverso un solo filtro o 
la combinazione di 2 o pi� filtri. Voi come risolvereste questoproblema? 
Dovrei porre in VBA un sacco di di condizioni IF per verificare quali sono i 
filtri non nulli e poi creare tante combinazioni di istruzioni quante sono 
le possibilit� di combinare i 5 filtri (e sarebbero davvero tante...)
Non riesco a venirne a capo, � da un giorno ke ci ragiono :-/ 

 le possibilitï¿œ di combinare i 5 filtri (e sarebbero davvero tante...)
io direi non piu di 7
--
ac

 io direi non piu di 7
Potresti dirmi come faresti entro sette istruzioni a fare questa cosa? 
Perch� io non ci arrivo.

Alessandro Cara ha scritto:
P.S.
Ho terminato l'insalata
Dim sFiltro as string
sFiltro = ""
sFiltro = iif("" & Filtro1 =="",""," AND campo1 = '" & Filtro1  & "'")
sFiltro = iif("" & Filtro2 =="",""," AND campo1 = '" & Filtro2  & "'")
.....
sFiltro = iif("" & Filtro121282 =="",""," AND campo121282 = '" & 
Filtro121282 & "'")
cbx.rowsource = "select blabla " & iif(sfiltro="","", "Where " & 
mid(sFiltro,5))
that's all
--
ac

Alessandro Cara ha scritto:
PPS
Sorry!
sFiltro = sFiltro & iif("" & Filtro1 =="",""," AND campo1 = '" & Filtro1 
  & "'")
e cosi' per tutte le altre simili
--
ac

 ha scritto nel messaggio 
news:cTiPl.16394$Ux....@tornado.fastwebnet.it...

Grazie mille per la disponibilit� e la rapidit� delle tue risposte, ma le 
mie conoscenze sul campo sono troppo limitate e non riesco a fare questa 
operazione che evidentemente richiede conoscenze pi� approfondite. Ho 
provato a copiare le tue istruzioni sul VBA modificando il nome dei campi, 
ma il compilatore mi va in errore dopo il secondo =
Sicuramente sono io che non riesco ad utilizzare i tuoi consigli... :-/ 

 
Scusami mi e' scappato un "=" di troppo (abitudine ad un altro linguaggio)
i.e.
sFiltro = sFiltro & iif("" & Filtro1 ="",""," AND campo1 = '" & Filtro1 &
"'")
Per stasera ho finito vado ad "uccidermi" con un serial TV.
--
ac

 ha scritto nel messaggio 
news:4a0db518$0$705$5fc...@news.tiscali.it...

guarda la faq 3.73 del sito comune
Sincronizzare in una maschera due o pi� caselle combinate tra loro NON in 
gerarchia
www.sitocomune.com
ciao
Daniele

 "'")
Grazie mille, sei stato troppo gentile. Adesso non ci sono pi� errori di 
compilazione, ma non risco cmq ad implementare correttamente queste 
funzioni...
Grazie ancora di tutto :) 

 
www.sitocomune.com
Grazie per l'aiuto. Ma quello che devo fare io � un po' diverso ;) 


Io userei un metodo + 'brute force'......
Ciclo sulle combo
Sul bottone che avvia il filtro
dim C as control
dim Criterio as string
For each C in me.form
    if c.controltype=accombobox then
        if c.value <> "" then
            Criterio = Criterio & c.value
        end if
    end if
next
con i dovuti aggiustamenti..chiaramente...
Ora qualsivoglia numero di caselle combinate, caselle di testo o quello che vuoi viene gestito SOLO se � pieno. E nn devi scomodare altro....
 
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it