[ACCESS] combobox

[ivano_76]

Ho la seguente maschera con:
1 pulsante
1 combobox il cui contenuto è collegato ad una tabella

Quando avvio la maschera e clicco sul menu a tendina della combo veo tutti i campi della tabella e fino qui ok.

Clicco su una voce della combobox e poi clicco sul pulsante. Vorrei riuscire ad intercettare il valore della combobox e passarlo ad una query ma non ci riesco.
Ho fatto 2 tentativi.
1.
Nella query interessata ho messo come valore nel campo "nome" la seguente dicitura:
=Maschera1!casella1.value
Ma al momento di eseguire la query non funziona niente e mi viene presentata una tabella vuota

2.
Nel codice sull'evento click del pulsante ho fatto:
DoCmd.openQuery "Nome query" ma non funziona e poi ho provato a fare cosi
DoCmd.RunSQL "SELECT * FROM Tabella WHERE nome ='" & casella1.value & "'"

ma non funziona!!!!!!!!!!!!
Aiutatemi

[Alethesnake]

devi controllare quante colonne sono state inserite nella combo e qual'è quella associata.
in generale se la colonna è una sola ti basta un

me.nomeCombo.value

altrimenti puoi usare

me.nomeCombo.column(indiceColonna)

[seclimar]

nell'evento del PULSANTE ...
vai a fare un bel DEBUG:
o metti un break point e fai delle prove

oppure metti un bel
MSGBOX Maschera1!casella1.value
per vedere cosa c'e' dentrto
al limite provi a modificare il valore tipo
MSGBOX Maschera1!casella1.xxxx
fino a che trovi quello che ti serve!!!

un buon metodo di DEBUG ti fa risparmiare ore e ore di lavoro ogni giorno per trovare e risolvere problemi

[ivano_76]

La colonna associata alla Combo è sicuramente quella giusta xché in effetti vedo i dati quando clicco su di essa.


me.combo.value dove lo metto? Nella query oppure nell'evento del pulsante?

[seclimar]

beh...dipende
cosa ci devi fare?

dimmi quale e' il tuo obiettivo finale...
una volta che hai scelto qualcosa nel combo....cosa deve cambiare ?

[Alethesnake]

[supersaibal]Originariamente inviato da ivano_76
La colonna associata alla Combo è sicuramente quella giusta xché in effetti vedo i dati quando clicco su di essa.


me.combo.value dove lo metto? Nella query oppure nell'evento del pulsante? [/supersaibal]

la colonna associata e la/le colonne che vedi nel quando srotoli il menu a tendina non sono necessariamente la stessa cosa.
se vuoi che la query venga eseguita quando premi il pulsante allora metti tutto nella routine associata all'evento onClick dello stesso.
cmq intanto ti conviene iniziare con un

dim sql as string
sql =  "SELECT * FROM Tabella WHERE nome ='" & me.nomeCombo.value & "'" 
msgbox sql

e guarda se la query è corretta

[ivano_76]

Ok ho fatto come dici tu. La SQL viene corretta. Ora come faccio a mettere tutto come argomento della Query? Ti ricordo che vorrei questo:
Dalla combo seleziono il valore e fancedo click sul pulsante vorrei passare il valore selezionato alla query

grazie ancora

[seclimar]

[supersaibal]Originariamente inviato da ivano_76
Ok ho fatto come dici tu. La SQL viene corretta. Ora come faccio a mettere tutto come argomento della Query? Ti ricordo che vorrei questo:
Dalla combo seleziono il valore e fancedo click sul pulsante vorrei passare il valore selezionato alla query

grazie ancora [/supersaibal]

la query e' gia pronta...puoi usarla!
cosa devi fare con la query ?

se vuoi il classico FORM con tanti record
e un COMBO di ricerca veloce record...che ti posiziona il form sul record scelto
c'e' gia' la wizard di access che lo fa!

ti serve questo ??

[Alethesnake]

[supersaibal]Originariamente inviato da ivano_76
Ok ho fatto come dici tu. La SQL viene corretta. Ora come faccio a mettere tutto come argomento della Query? Ti ricordo che vorrei questo:
Dalla combo seleziono il valore e fancedo click sul pulsante vorrei passare il valore selezionato alla query

grazie ancora [/supersaibal]

mi sa che non ho capito qual'è l'obiettivo finale..
se è solo quello di creare una nuova query (che verrà aggiunta nel menu query) puoi fare così:

dim sql as string, queryName as string
Dim db As Database
Dim query_s As QueryDef

queryName = "Nome della Query"
sql = "SELECT ...."

Set query_s = db.CreateQueryDef(QueryName, sql)

set db = nothing

[ivano_76]

Ricapitoliamo

Ho una tabella con dei nomi di persone che si chiama PERSONE. Ho una maschera che si chiama MASCHERA1 che ha una combo e un pulsante.
Ho creato una query normale (senza parametri) che estrae tutti i nomi dalla tabella. Il nome della Query è CERCA.
Voglio questo: scelgo il nome tramite la combo e quando faccio click sul pulsante, il nome che ho scelto deve essere passato alla query CERCA. Io credevo che mettendo nei criteri della Query questo codice
=Maschera!combo1.value
la Query mi facesse visualizzare la persona che ho scelto tramite maschera. E invece non lo fa
Quindi: scelgo dalla combo la persona, clicco sul pulsante e il valore selezionato deve farmi scatenare una query che mostri i dati di quella persona. Spero di essere chiaro....
In realtà poi il pulsante chiamerà un report che a sua volta chiamerà la query CERCA.