Impossibile aggiornare la query ...

[fruttosio79]

Se uso questo codice:

' Aggiornamento quantità carrello della spesa
IF Request( "updateQ" ) <> "" THEN
	SET RS = Server.CreateObject( "ADODB.Recordset" )
	RS.ActiveConnection = Con
	RS.CursorType = adOpenDynamic
	RS.LockType = adLockOptimistic
	sqlString = "SELECT carrello.*, prodotti_giacenza FROM carrello, prodotti " &_
		"WHERE carrello_utenteID=" & userID &_
		" AND prodotti_id=carrello_prodottoID"
	RS.Open sqlString
	
	WHILE NOT RS.EOF
	newQ = TRIM ( Request( "pq" & RS("carrello_id") ) )
	idcarrello = RS( "carrello_id" ) 
	giacenza = RS( "prodotti_giacenza" )
	
	response.write newQ
	
	' controllo quantità valida, max 6 pezzi per codice
	IF newQ = "0" THEN
	  	RS.Delete
	ELSE
		IF isNumeric( newQ ) THEN
	    	newQ = newQ
	    ELSE
	    	newQ = 1	
	  	END IF
	  	IF newQ <= 5 THEN
	  		newQ = newQ
	  	ELSE
	  		newQ = 6
	  	END IF			
	END IF

Mi esce errore:
Impossibile aggiornare la query perché la clausola FROM non è un nome singolo di tabella semplice.

Sulla linea del RS.Delete, come posso sistemare?

[fruttosio79]

In sostanza dentro al RS.Delete dovrei inserire il riferimento alla tabella "carrello", ma come si fà?

Ciao

[fruttosio79]

up

[fruttosio79]

Se guardata il mio Recordset capirete che io estraggo

carrello.*, prodotti_giacenza

e per questo il comando RS.Delete non funziona.

Se invece usassi solo carrello.* il camando Delete funziona.
Ma a me serve fare quella select nella querystring.

Come faccio ?

[fruttosio79]

Il comando RS.Delete non è in nessun caso modificabile?
Cioè, il comando è così e non si possono aggiungere proprietà ecc ??

Aiuto !!

[fraude]

Ma perchè non usi una query DELETE?

[fruttosio79]

Come è?
Fammi un esempio ed io lo adatto ai miei campi.

Grazie per la risposta

[fraude]

strSQL = "DELETE FROM clienti " 
strSQL = strSQL & "WHERE Username=' "&Username&" ' AND Password=' "&Password&" ' " 
DBConn.Execute strSQL

[fruttosio79]

Qualcosa di questo tipo:

	IF newQ = "0" THEN
		sqlString = "DELETE WHERE carrello_prodottoID=carrello_id"
		Con.Execute sqlString	
	END IF

Ma non funziona, ma dopo DELETE non andrebbe dichiarato un campo, o meglio il recordset?

Ciao

[fraude]

IF newQ = "0" THEN
		sqlString = "DELETE FROM tuatabella WHERE carrello_prodottoID = "&carrello_id
		Con.Execute sqlString	
	END IF