Italian Query impossibile

[LucaMs]

Note non è forse una parola riservata? Forse ricordo male....

No.

https://www.sqlite.org/lang_keywords.html

 

[LordZenzo]

Dim objSpesa As clsSpesa
objSpesa.Initialize

objSpesa.ReadByData(Data As Long) [oppure objSpesa.FillByData]

objSpesa.Insert

objSpesa.Update

...

Non male, no?

ma dovrebbe comunque creare la query dentro la classe, riutilizzabile, e se sbaglia a fare la query non importa dove, sbaglia comunque...

 

[LucaMs]

La query la "sbagli meno" se usi la versione 2 delle query (ExecNonQuery2, ad esempio).

Il suggerimento di usare delle classi era generale, non riguardava il caso specifico.

 

[tactic1960]

Ciao, nella mia app ( da relax ) ho una tabella spese, guarda caso, che ha più o meno i campi della tua e l'ho gestita così :

Dim la_CampiSpese( 5 ) As Object

la_CampiSpese( 0 ) = Null
la_CampiSpese( 1 ) = ar_spese.cconto
la_CampiSpese( 2 ) = ar_spese.nrotel
la_CampiSpese( 3 ) = ar_spese.dd
la_CampiSpese( 4 ) = ar_spese.mm

Starter.g_SQL.BeginTransaction()

Starter.g_SQL.ExecNonQuery2( "INSERT INTO spese VALUES( ?, ?, ?, ?, ? )", la_CampiSpese )

Starter.g_SQL.TransactionSuccessful()
Starter.g_SQL.EndTransaction()

Praticamente :
1) definisci un array di OBJECT con tanti elementi quante sono le colonne della tabella
2) Il primo elemento, é un campo autoincrement lo valorizzi a NULL
3) Chiami la ExecNonQuery2 come suggerito da LucaMs

Deve andare

Ciao, Massimo