[VB6] Query per la somma di una Colonna

[Wanny]

Salve a tutti.

Stò realizzando un programma che gestisce delle sale , adesso il mio problema è il seguente.

Ho in un database dei campi che gestiscono lo stato della sala ( Libero occupato ) e un campo sempre all'interno del database denominato " totale " questo è il codice che ho su un bottone per liberare la sala e chiudere il relativo conto.

    
cn.Open stringa
rs.Open "select * from sala where numero_sala= '" & TXT_tav.Text & "'", cn, 3, 3

rs("occupato") = 0
rs("libero") = 1
rs.Update
rs.Close
rs.Open "SELECT Sum(totale) AS Totale From sala Where numero_sala = '" & TXT_tav.Text & "'", cn, 3, 3
rs.Close

come potete notare , azionando il bottone occupato va a 0 e libero va a 1 , e questo funziona correttamente, poi dovrebbe calcolarmi tramite questa query

rs.Open "SELECT Sum(totale) AS Totale From sale Where numero_sala = '" & TXT_sala.Text & "'", cn, 3, 3

il totale del campo totale salvandolo in una variabile temporanea chiamata Totale, selezionando però solo i campi uguali al contenuto della textbox " TXT_sala.text

non mi funziona , e mi restituisce un errore , il seguente:

NESSUN VALORE SPECIFICATO PER ALCUNI PARAMETRI NECESSARI.

la sintassi mi sembra giusta .. aiutatemi voi a capire dove sbaglio , è 3 ore che ci sbatto la testa.

Ciao a tutti e grazie in anticipo.

[Wanny]

Nessuno sa dirmi nulla O.o

[Boolean]

se il campo numero_sala è di tipo numerico, è sbagliato passare il valore tra apici, trattandolo come stringa, quindi dovresti passarlo senza.

Boolean

[Grumpy]

Per indicare lo stato di occupata/libera dovrebbe bastare un solo campo.
La tabella si chiama "sala" o "sale" ?
Non vedo la variabile di nome Totale.

[Wanny]

La variabile totale è dichiarata in Generale.

Si per la determinazione di libero o occupato basta solo un campo , me ne occorrono due per realizzare una cosa successivamente.
La tabella li è un errore di trascrizione , nel mio progetto è corretta.

Ho tolto gli apici , ma sembra non essere quello il problema , continua a darmi lo stesso errore.
non so che fare

[Grumpy]

Originariamente inviato da Wanny
La variabile totale è dichiarata in Generale.

E quando viene valorizzata? Mai, visto che subito dopo aver aperto il recordset lo chiudi.

Gli apici, come ti ha detto boolean, devi toglierli se il campo numero_sala è numerico, non per esperimento.

[Wanny]

Rs viene chiuso prima di valorizzare Totale , semplicemente perchè mi da errore proprio sulla Query :

rs.Open "SELECT Sum(totale) AS Totale From sala Where numero_sala = " & TXT_tav.Text & "", cn, 3, 3

a errore risolto il codice completo dovrebbe diventare così, assegnando alle TXT_tsala.Text il valore di Totale generato dalla query.

rs.Open "SELECT Sum(totale) AS Totale From sala Where numero_sala = " & TXT_tav.Text & "", cn, 3, 3
TXT_tsala.Text = rs!Totale
rs.Close

[Grumpy]

Dubito che il motivo sia quello.
Il messaggio di errore che ricevevi indicava che nella tabella non esiste un campo con il nome specificato nella WHERE. Probabilmente la query che eseguivi non era esattamente uguale a quella che hai trascritto.