Newsgroup: it.comp.appl.access
Titolo: Casella combinata da Casella combinata

Ciao a tutti,
il mio problema e creare un casella combinata che visualizzi
una serie di record provenienti da un'altra casella combinata. Che fare?!
Cerco di spiegarmi con un esempio:
Ho una tabella che chiamiamo "Cucina"
in questa ho i campi "PRIMI/SECONDI/CONTORNI" e "TIPOCIBO". 
Il campo
"PRIMI/SECONDI/CONTORNI" pesca da una tabella dove ho:
_____________________
IDPSC      DEF
1          primi
2
secondi
3          contorni
_____________________ 
poi ho una
tabella "TIPOCIBO"
id tipocibo  IDPSC     "PRIMI/SECONDI" 
1
1          penne
2             1          lasagne
3             2
bistecca
3             3          verdura alla piastra 
quello che
cerco di fare e che seleziono primi nella casella combinata "tipocibo"
vorrei selezionare solo i valori: "penne" e "lasagne" etc.
Che fare ?!
ciao Tiz
--------------------------------
Inviato via 
http://usenet.iol.it

 wrote in message
140Z105Z48Z16...@usenet.iol.it...

Dopo che hai selezionato Primi dalla prima casella combinata, la quale ti
restituisce
IDPSC = 1
Ipotizzando che la tua maschera si Chiami "Piatti" e la tua prima casella
combinata
si chiami "IDPSC",
nell'origine record della casella combinata "tipocibo" scriverai:
SELECT DISTINCTROW Tipocibo.Id_tipocibo, Tipocibo.IDPSC,
Tipocibo.PRIMI/SECONDI FROM Tipocibo WHERE
(((Tipocibo.IDPSC)=[Forms]![Piatti]![IDPSC]));
e su dopo 
agg.to
 della casella IDPSC scrivi:
Me.NomeTuaCasellaTipoCibo.Requery
ed il gioco è fatto.
ciao Riccardo

 ha scritto nel messaggio
news:140Z105Z48Z16...@usenet.iol.it...

Se la maschera che contiene le due caselle combinate si chiama Maschera1.
Se le due caselle combinate si chiamano rispettivamente ComboCucina e
ComboTipoCibo.
Se ambedue le caselle combinate hanno due colonne di cui la prima non
visibile.
Come origine riga della casella combinata ComboCucine imposta questo codice
SQL:
SELECT DISTINCTROW [Cucina].[IDPSC], [Cucina].[DEF] FROM [Cucina];
Come origine riga della casella combinata ComboTipoCibo imposta questo
codice SQL:
SELECT DISTINCTROW TIPOCIBO.IdTipoCibo, TIPOCIBO.PrimiSecondi FROM TIPOCIBO
WHERE (((TIPOCIBO.IDPSC)=[Forms]![Maschera1]![ComboCucina]));
A fronte dell'evento "Dopo aggiornamento" della casella combinata
ComboCucina genera questa riga di codice VBA:
Me!ComboTipoCibo.Requery
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Grazie mille!!!!funziona benissimo,
ma vorrei chiedervi ancora, visto
che avete risposto in molti, come visualizzare/nascondere dei pulsanti a
seguito di una selezione in una casella combinata...
Grazie ancora 


Utilizza la proprietà Visible=False e/o Enabled=False del comando o TextBox
o altro, importante è prima spostare il Focus su un altro oggetto poichè non
è possibile, che io sappia in Access ( in VB è possibile) mi perdonino gli
esperti, disbilitare un comando con lo stato attivo.
Alex.
-- 
Posted from [212.141.54.103] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Perché non provi a fare un esempio concreto di cosa ti serve.


 ha
scritto: 



Ciao provo ad essere
concreto
ho una tabella cucina:
IDcucina   PSC        tipocibo
1
primi      penne
2          primi      lasagne
3          secondi
bistecca
i campi "PSC" e "tipocibo" sono delle caselle combinate
però se alla selezione nella casella combinata "PSC" con il valore "primi"
(la stessa filosofia penso sia attuabile se è riferito al valore del campo
"tipocibo") volessi attivare un pulsante di comando di nome "ingredienti",
il quale  apre una maschera "maschera_ingredienti" cosa dovrei fare?
Spero di essere stato chiaro...
grazie tiz


 Inviato via 
http://usenet.iol.it
____________
Mi sembra cosě:
Select Case Me.PSC.Column(2)    'Se la casella contiene 2 Colonne e la 2a
contiene l'elenco
    Case "primi"
        Me.PulsanteIngredienti.Enabled=true
End Select
in questo modo puoi aggiungerti tutti i casi che vuoi.
ciao Riccardo

ciao Riccardo
Ciao,
devo chiederti una cortesia, nel senso che questa stringa devo inserirla
nel pulsante di comando?!
Grazie e scusa ancora...
Ciao Tiz


 Ciao Tiz
_______
No.
Vuoi che il pulsante si abiliti o meno alla selezione della Casella
Combinata PSC?
Allora su dopo aggiornamento della Casella PSC
inserisci quel codice.
ciao Riccardo

ciao Riccardo
ciao,
nel caso abbia già
una una routine...
Private Sub combocucina_AfterUpdate()
Me.combotipocibo.Requery
End Sub
quella che mi hai scritto sopra deve
essere collocata subito dopo... 
ciao tiz



###############
 Private Sub combocucina_AfterUpdate()
 Me.combotipocibo.Requery
Select Case Me.PSC.Column(2)
    Case "primi"
        Me.PulsanteIngredienti.Enabled=true
End Select
 End Sub
ciao Riccardo