Italian somma db

saslvovc

Member
Licensed User
Longtime User
salve ragazzi qualcuno sa dirmi come sommare valori di una colonna in un database e visualizzare il totale in una label
 

saslvovc

Member
Licensed User
Longtime User
si ho fatto cosi

Dim total As Double

total= "SELECT SUM(Importo) FROM " & Main.SelectedTable

Msgbox("Total = " & total, "")

mi da errore: invalid double: SELECT SUM(Importo) FROM pippo"

campo Inporto Tipo Numerico
devo fare la somma di valori con la virgola tipo: 90.85 ecc
 

maXim

Active Member
Licensed User
Longtime User
Ciao saslvovc,

prova ad adattare questo esempio:

B4X:
Dim SQL1 As SQL
Dim MyQuery As String
Dim db_cursor As Cursor
Dim somma As Double

MyQuery = "SELECT SUM(CAMPONUMERICO) AS SOMMACAMPONUMERICO FROM NOMETABELLA"
db_cursor = SQL1.ExecQuery(MyQuery)
somma = db_cursor.GetDouble("SOMMACAMPONUMERICO")
db_cursor.Close
;)
 
Top