ci sono riuscito così:

SQL2 = " SELECT Importi FROM Utenti WHERE UserID = '" & QSUserID & "'"
response.write SQL2
Set RS2 = Conn.Execute(SQL2)

'aggiorno gli importi
SQLagg = " UPDATE Utenti SET Importi = Importi - '"& QSTotale &"' WHERE UserID = '" & QSUserID & "'"
Set RSagg = Conn.Execute(SQLagg)


grazie davvero mille per l'aiuto,
a presto ;-)