Uffà! ADODB.Recordset error '800a0bb9'

[Jmdef]

Salve a tutti, è da ieri pomeriggio che ci sbatto la testa su 'sta cosa!

Allora, l'errore completo è

ADODB.Recordset error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/gestione_stagione_add.asp, line 77

ed è riferito a questa linea:

objRS_gestag.Open "Albi", objConn_f1, adOpenKeyset, adLockOptimistic, adCmdTable

Ok, premetto che le linee evidenziate del codice che posto ora sono IDENTICHE (ho fatto copia-incolla) a quelle utilizzate in un altro script che funziona a meraviglia...

	
	


<%
	dim passo,objRS_gestag
	Set objRS_gestag = Server.CreateObject("ADODB.Recordset")

	if request("passo") = "" then
		dim SQL_gestag, anno_nuovo
		SQL_gestag = "SELECT Anno FROM Albi ORDER BY Anno DESC"

		objRS_gestag.Open SQL_gestag, objConn_f1
		anno_nuovo = objRS_gestag("Anno") + 1
		objRS_gestag.close
%>
		<table align="center" border="0" cellpadding="1" cellspacing="1">
		<tr>
			<td colspan="2">Aggiungo l'anno <%= anno_nuovo %> all'elenco delle stagioni</td>
		</tr>
		<tr>
			<td>Si</td>
			<td>No</td>
		</tr>
		</table>

<%
	else
		'creo la nuova tabella
		'dim strSQLnewtable
		'anno_nuovo = request("anno_nuovo")
		'strSQLnewtable = "CREATE TABLE Stag_" & anno_nuovo & " (Tipo_dato VARCHAR(30), Sottotipo_dato VARCHAR(30), Data DATE, Nazione INTEGER, Circuito INTEGER, Pilota INTEGER, Scuderia INTEGER, Posizione_arrivo INTEGER, Tqual_Tgara VARCHAR(50), Tarrivo_distacco_causaritiro VARCHAR(50), Nr_soste INTEGER, Gomme INTEGER, Nr_vettura INTEGER);"
		'objConn_f1.Execute(strSQLnewtable)

		'aggiungo anno all'albo

		'dim strSQL_insert
		'strSQL_insert = "INSERT INTO Albi (Anno, Pilota, Squadra, Costruttore, Motore) VALUES (" & anno_nuovo & ", 141, 141, 110, 11);"
		'objConn_f1.Execute(strSQL_insert)

		objRS_gestag.Open "Albi", objConn_f1, adOpenKeyset, adLockOptimistic, adCmdTable
			objRS_gestag.AddNew
				objRS_gestag("Anno") = anno_nuovo
				objRS_gestag("Pilota") = 141
				objRS_gestag("Squadra") = 141
				objRS_gestag("Costruttore") = 110
				objRS_gestag("Motore") = 11
			objRS_gestag.Update
		objRS_gestag.Close 
%>
		


		Inserimento effettuato!
		



		Aggiorna elenco delle stagioni


<%
	end if

	'disconnessioni varie
	set objRS_gestag = nothing
	objConn_f1.close
	set objConn_f1 = nothing
end if
%>

Ho provato in 2 modi, con

objRS_gestag.Open "Albi", objConn_f1, adOpenKeyset, adLockOptimistic, adCmdTable
			objRS_gestag.AddNew
				objRS_gestag("Anno") = anno_nuovo
				objRS_gestag("Pilota") = 141
				objRS_gestag("Squadra") = 141
				objRS_gestag("Costruttore") = 110
				objRS_gestag("Motore") = 11
			objRS_gestag.Update
		objRS_gestag.Close

che sarebbe il codice "copiato" dall'altro script mi dà l'errore di cui sopra...

Con:

dim strSQL_insert
strSQL_insert = "INSERT INTO Albi (Anno, Pilota, Squadra, Costruttore, Motore) VALUES (" & anno_nuovo & ", 141, 141, 110, 11);"
objConn_f1.Execute(strSQL_insert)

mi restituisce:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement.

Ho controllato di tutto e di più... nomi tabelle, posizione db, nome campi...

Avete qualche dritta?

[Killer99]

prova con questa:

strSQL_insert = "INSERT INTO Albi (Anno, Pilota, Squadra, Costruttore, Motore) VALUES (" & anno_nuovo & ", "141", "141", "110", "11");"

[Jmdef]

niente da fare... avevo già provato a passare i parametri come stringhe (io avevo usato gli apici ' però), ma giustamente mi dice che nn corrispondono al tipo delle colonne (sono interi).

Con le virgolette mi retituisce un "Expected end of statement".