Newsgroup: it.comp.appl.access
Titolo: Aiuto, "Nessun valore specificato per alcuni parametri necessari"

Dim strSQL As String
Dim conteggio As Integer
Dim objRS As ADODB.Recordset
Set objRS = New ADODB.Recordset
strSQL = "SELECT COUNT(idInserimento) AS Conteggio FROM QryConteggio"
objRS.Open strSQL, CurrentProject.Connection, adOpenStatic, adLockReadOnly
conteggio = objRS("Conteggio")
objRS.Close
Set objRS = Nothing
Mi restituisce l'errore di cui all'oggetto.
Idee? L'help su questo errore mi rimane bianco!
Grazie

Ho dimenticato di riferire che il debug segna come riga che genera l'errore 
quella dell'apertura:
objRS.Open strSQL, CurrentProject.Connection, adOpenStatic, adLockReadOnly
"Wrugaian" <wrugai...@NOSPAMemail.it> ha scritto nel messaggio 
news:XZCPf.24590$A83.6...@twister1.libero.it...


 objRS.Open strSQL, CurrentProject.Connection, adOpenStatic, adLockReadOnly
1) Hai  sbagliato un nome di campo (forse in qryconteggio)
2) Tutti hanno bisogno di "aiuto" quindi e' superfluo nel soggetto
3) Per favore scrivi in coda al messaggio cui rispondi
--
ac

 3) Per favore scrivi in coda al messaggio cui rispondi
Ho risposto a me stesso.. era un'aggiunta per una cosa che avevo dimenticato 
di scrivere; mi sembrava più intelligente lasciarla in testa al messaggio. 

 medesimo errore.
Non mi riferivo a "Conteggio" citavo qryconteggio. Quel messaggio e' un 
classico. Eseguendo qryconteggio da sola funziona?
2-3) Per me puoi fare quello che vuoi. Ho scritto solo due "suggerimenti".
--
ac

 classico. Eseguendo qryconteggio da sola funziona?
Ed è questo che mi fa impazzire.. da sola funziona.. è quando la richiamo da 
VBA che non funziona +..


mi fai la cortesia. Copi e incolli l'sql di qryconteggio.
--
ac

 mi fai la cortesia. Copi e incolli l'sql di qryconteggio.
SELECT * FROM tblConsuntivo
WHERE (((tblConsuntivo.Data)<=[Forms]![mscInserimento]![DataFine] And 
(tblConsuntivo.Data)>=[Forms]![mscInserimento]![DataInizio]));
che con Form aperta funziona regolarmente.. a form chiusa mi chiede il 
valore delle 2 variabili data.. e funziona regolarmente.
Anche queryprova:
SELECT COUNT(idInserimento) AS Conteggio
FROM QryConteggio;
funziona regolarmente in access..
Ma se cerco di accedere a questa o a all'altra, o anche direttamente a 
tblConsuntivo ho errore.
Io credo sia il WHERE sulla data.. ma pensavo che accedendo a una query già 
fatta VBA non mi facesse problemi. 

Forse ho risolto..
Ho tolto il riferimento alle date nella query e apro la query così:
strSQL = "SELECT COUNT(idInserimento) AS Conteggio FROM QryConteggio WHERE 
Data>=#" & Format(Forms("mscInserimento").Controls("DataInizio"), 
"dd-mmm-yyyy") & "# AND Data<=#" & 
Format(Forms("mscInserimento").Controls("DataFine"), "dd-mmm-yyyy") & "#"
Dove con [Forms]![mscInserimento] ecc.. mi dava errore e senza la 
formattazione della data mi prendeva l'8 marzo come il 3 agosto.
Che fatica... 


non i sembra che tu possa eseguire una sql che richiama una  query con 
parametri variabili (i.e. DataFine e Datainizio) devi impostarli tu come 
"parameters". C'e' piu' di un post sull'argomento. Mi sembra ci sia 
qualcosa al riguardo anche nel sito di Karl.
In questi casi personalmete uso un metodo molto spartano.
Metto dei parametri di sostituzione facilmente riconoscibili, mi faccio 
dare l'sql via querydef e sostituisco con replace i parametri variabili 
con i valori effettivi.
Questa soluzione prevede che si usi DAO.
Questo e' un esempio:
Set qdef = CurrentDb.QueryDefs("AX_PreparaFatturabile")
sSQL = Replace(qdef.SQL, "%1%", cbxVal)
DoCmd.RunSQL sSQL
Ovviamente l'altra soluzione e' costruire dinamicamente l'sql.
--
ac

 Questo e' un esempio:
[cut]
Interessante possibilitŕ a cui non avevo pensato. Grazie..
Io ho risolto costruendo la SQL come postato poco fa.
Il fatto č che io avevo cominciato proprio in quel modo, ma passando il 
parametro con [Forms]![NomeForm]![ecc...] e NON funzionava.
Ho ripreso quella SQL passando il parametro con 
Forms("NomeForm").Controls("NomeControllo") e ha funzionato..
Evidentemente c'era un errore che non vedevo prima e poi mi sono imbarcato 
nella costruzione di una query andando incontro al problema che mi hai detto 
tu.
Ciao