Problema con clausola WHERE IN

[Umanista]

Proprio non capisco.
Se scrivo questa semplice stringa SQL per l'update di una tabella di Access

"UPDATE frutta SET quantita = (quantita + 1) WHERE frutto IN ('arancia', 'mela', 'pera')"

tutto funziona correttamente.

Se invece scrivo

"UPDATE frutta SET quantita = (quantita + 1) WHERE frutto IN (" & listaFrutta & ")"

dove listaFrutta è una stringa come la seguente: "'arancia', 'mela', 'pera'"

In questo secondo caso viene aggiornato solo il record che fa riferimento ad arancia.
Boh!

Grazie per l'attenzione.

[Umanista]

up!
A nessuno di voi è mai capitata una cosa del genere? :master:

[iperuber]

allora fai nel primo modo, no ?

[Ottavio]

non c'è motivo per non funzionare ...
a meno che nn formatti male listaFrutta
(tipo un apice di meno, di troppo....)
postacelo

[Umanista]

Quella che segue è la funzione che uso allo scopo sopra indicato.

Function incr_decr_Aree(toDo As String, listaAree As String) As Boolean
			
Dim theQuery As String
								
Select Case toDo
				
Case "incr": 'incrementa

theQuery = "UPDATE frutta SET quantita = (quantita + 1) WHERE frutto IN ('"  
theQuery += listaAree.Replace(",", "', '")
theQuery += "')"
 

Case "decr": ' decrementa
	' query in costruzione

End Select
			
Dim areeCmd As new oleDbCommand(theQuery, Con)
						
							
	Try
		
 		Con.Open()
				
	Dim confirm As Integer	
				
	confirm = areeCmd.ExecuteNonQuery()
					 
		Con.Close()
				
If confirm > 0 Then
				
Return True

Else

Return False															
End If	 	  	  				
				
	Catch


End Try
					
	
End Function

Il primo parametro indica quale query utilizzare.
Per ora sto testando la prima: "incr"
Il secondo parametro (listaAree) rileva il risultato di una checkboxList, che ovviamente è del tipo: mela, pera, arancia ecc.
Ho anche provato con un response write a stapare la query, ed è corretta! Ricevo cioè un risultato come questo

UPDATE frutta SET quantita = (quantita + 1) WHERE frutto IN ('mela', 'pera', 'arancia')

ma come al solito viene aggiornato solo il record corrispondente al primo elemento, in questo caso 'mela'.
Ci sto diventando matto. Anch'io non capisco come sia possibile.

Grazie ragazzi.

[Umanista]

Sono un coglio..

L'errore era qui

theQuery += listaAree.Replace(",", "', '")

Non mi accorgevo che dopo la prima virgola mancava uno spazio
La soluzione è questa:

theQuery += listaAree.Replace(", ", "', '")

Scusate

[Ottavio]