none
VB2017-errore dichiarare variabile scalare RRS feed

  • Domanda

  • Buongiorno a tutti,

    il codice sotto riportato mi restituisce l'errore:

    "Dichiarare la variabile scalare @data_ini " , è come se nella stringa sql fosse un nome di campo e non una variabile.

    Dove sbaglio ? Grazie

            stringa_sql = "select Tipo_odv, Des_tipo_odv, Nr_odv, Dt_odv, Agente_acq, Cliente, citta, Pv, Indirizzo, Ordine_acq, Importo_netto, Importo_netto_Oth FROM Tb_odv_testa"
            stringa_sql = stringa_sql & " WHERE Dt_odv >= @data_ini"
            stringa_sql = stringa_sql & " And Dt_odv <= @data_fine"
    
            If RadioButton2.Checked = True Then
                stringa_sql = stringa_sql + " AND tipo_odv <> ZICV"
            End If
    
            data_iniziale = dtp_dataDa.Value
            data_finale = dtp_DataA.Value
    
            cmd = New SqlCommand(stringa_sql, objCnn)
            cmd.Parameters.Add("@data_ini", SqlDbType.Date)
            cmd.Parameters("@data_ini").Value = data_iniziale
    
            cmd.Parameters.Add("@data_fine", SqlDbType.Date)
            cmd.Parameters("@data_fine").Value = data_finale
    
            'Attenzione mettere il campo chiave altrimenti non funziona aggiornamento alla form successiva
            da_grd_progetto = New SqlDataAdapter(stringa_sql, My.Settings.Cnn_DB)
            tab_grd_progetto = New DataTable("griglia")
            Try
                da_grd_progetto.Fill(tab_grd_progetto)
            Catch ex As Exception
                MsgBox(ex.ToString)
            End Try
    
            grdElencoOdv.DataSource = tab_grd_progetto
    
    grazie

    venerdì 26 giugno 2020 12:49

Risposte

Tutte le risposte