Passare parametri a query in vba

di Yuri il
22 risposte

Ciao, sto cercando far funzionare queste istruzioni ma finora niente:

Dim DBCorrente As DAO.Database
Dim RS As DAO.Recordset
Dim qryDef As DAO.QueryDef
Dim strSql As String

   Set DBCorrente = CurrentDb
   Set qryDef = DBCorrente.QueryDefs("qrySpeseCommessa")
   qryDef.Parameters![ID_preventivo] = 1

  
  ' Esegui la query
   Set RS = qryDef.OpenRecordset()

   'Me.txtTotVitto = RS.Fields("TotVitto").Value
   MsgBox RS![totvitto]

mi da errore nel passaggio del parametro : "Elemento non trovato in questa raccolta"

Qualcuno mi può aiutare?

Grazie

Yuri

22 Risposte

  • StrSql As String cosa hai scritto?

    Dove hai specificato che usi un parametro nella sql?

    Tipo select * fron tabella where campo=[parametro]

  • Riporta qui la qrySpeseCommessa

    P.S. Formatta il codice quando scrivi sul forum 

  • Perdonate non c'ho pensato

  • La query che uso una semplice select ed è salvata nel db. ne vorrei estrarre un solo record relativo all' id_preventivo e leggerlo nella form

  • Yuri… hai la tendenza a ignorare quello che ti viene chiesto.

    Vuoi mostrare la query o no?

  • Eccola : select * from C_060_Spese_Commessa

  • Dove vedi parametri?

  • Quindi devi modificare la query aggiungendo la WHERE con ID_preventivo

    Yuri … stiamo parlando delle basi… dovresti studiare qualcosa di basilare primadi usare un DB…   

  • Il parametro devo passarlo da codice, e poi se lo sai dimmelo …grazie.

  • 06/11/2023 - sihsandrea ha scritto:


    StrSql As String cosa hai scritto?

    Dove hai specificato che usi un parametro nella sql?

    Tipo select * fron tabella where campo=[parametro]

    Il parametro lo devo passare da codice

  • 06/11/2023 - Yuri ha scritto:


    Il parametro devo passarlo da codice, e poi se lo sai dimmelo …grazie.

    Te l'ho detto!

    Forse la parola parametro è complicata? Chiamala variabile!

    Select …. Where campodavariare=variabile

    Prima di lanciare la rs setti la variabile e la select diventa

    Where campo=1

    Risetti la variabile e diventa where campo=5

  • Scusate ma avete letto la mia domanda all'inizio?

  • Non ho ancora ricevuto una risposta seria da nessuno di voi

Devi accedere o registrarti per scrivere nel forum
22 risposte