Ciao ragazzi, ho un problema con ACCESS 10 che spero non sia complicatissimo da risolvere.

Da un modulo voglio aprire la query "Mostra_Livello2" a cui ho aggiunto un criterio.


Nel modulo ho scritto il codice seguente in VB:

Sub Visualizza_Livello_Sottostante(CodiceProdotto)

Dim ControlloAggregato As New ADODB.Recordset

Form_Albero.CodiceProdotto = CodiceProdotto

ControlloAggregato.Open "SELECT * FROM Mostra_Livello2", CurrentProject.Connection, adOpenKeyset, adLockBatchOptimistic


La query in codice SQL è la seguente:

SELECT Livello2.Materia_Prima, Articoli.Descrizione, Articoli.Prezzo, Livello2.Numero_pezzi, Livello2.ID
FROM Livello2 INNER JOIN Articoli ON Livello2.Materia_Prima = Articoli.CodArt
WHERE (((Livello2.Aggregato)=[forms]![Albero]![CodiceProdotto]));


Se eseguo il modulo mi dice:

Errore di Run-Time '-2147217904 (80040e10)':
Nessun Valore specificato per alcuni parametri necessari.


N.B.
la macro Visualizza_Livello_Sottostante viene eseguita dopo che è stato aperto il Form "Albero" e dopo che è stato caricato nella casella di Testo il "Codice Prodotto".

La query funziona correttamente e da il risultato esatto.



Grazie.