ok grazie funziona avevo sbagliato la pat del db ma adesso che ho corretto mi daun altra cosa:
inserimento avvenuto con successo
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][Driver ODBC Microsoft Access] Per l'operazione è necessaria una query aggiornabile.
/demo/immissione.asp, line 180
lo script e questo :
<%@ language = vbscript %>
<% option explicit %>
<% '************************************************* ************************************************** *********
'** Dichiaro le variabili da usare , quelle per i dati del database **
'** e quelle che servono per un uso generale (objrs, strsql) **
'************************************************* ************************************************** *********
%>
<%
dim auto
dim marca
dim modello
dim prezzo
dim anno
dim km
dim alimentazione
dim cilindri
dim marce
dim porte
dim tipo
dim colint
dim colcar
dim trasmissione
dim cv
dim revisione
dim equipag
dim cilindrata
dim info
dim objRs
dim strsql
%>
<% '************************************************* ************************************************** *********
'** Associo il valore delle variabili ai nomi dei moduli **
'** che servono per l' immissione dei dati nel database **
'************************************************* ************************************************** *********
%>
<%
auto = request.form ("auto")
marca = request.form ("marca")
modello = request.form("modello")
prezzo = request.form("prezzo")
anno = request.form("anno")
km = request.form("km")
alimentazione = request.form("alimentazione")
cilindri = request.form("cilindri")
marce = request.form("marce")
porte = request.form("porte")
tipo = request.form("tipo")
colint = request.form("colint")
colcar = request.form("colcar")
trasmissione = request.form("trasmissione")
cv = request.form("cv")
cilindrata = request.form("cilindrata")
revisione = request.form("revisione")
equipag = request.form("equipag")
info = request.form("info")
' response.write
' response.write
' response.write
'************************************************* ************************************************** *********
'** Prima le variabili che servono per l' immissione dei dati **
'************************************************* ************************************************** *********
strsql = "Select * FROM gen"
Set objRS = Server.createobject("adodb.recordset")
objRS.open strSQL, objconn,,adLockOptimistic
objRs.addnew
if auto <> "" then
objRs("auto") = auto
'response.write("fuori il primo") & "
"
end if
if marca <> "" then
objRs("marca") = marca
'response.write("fuori il secondo") & "
"
end if
if modello <> "" then
objRs("modello") = modello
'response.write("fuori il 3") & "
"
end if
if prezzo <> "" then
objRs("prezzo") = prezzo
'response.write("fuori il secondo") & "
"
end if
if anno <> "" then
objRs("anno") = anno
'response.write("fuori il secondo") & "
"
end if
if km <> "" then
objRs("km") = km
'response.write("fuori il secondo") & "
"
end if
if alimentazione <> "" then
objRs("alimentazione") = alimentazione
'response.write("fuori il secondo") & "
"
end if
if cilindri <> "" then
objRs("cilindri") = cilindri
'response.write("fuori il secondo") & "
"
end if
if marce <> "" then
objRs("marce") = marce
'response.write("fuori il secondo") & "
"
end if
if porte <> "" then
objRs("porte") = porte
'response.write("fuori il secondo") & "
"
end if
if tipo <> "" then
objRs("tipo") = tipo
'response.write("fuori il secondo") & "
"
end if
if colint <> "" then
objRs("colint") = colint
'response.write("fuori il secondo") & "
"
end if
if colcar <> "" then
objRs("colcar") = colcar
'response.write("fuori il secondo") & "
"
end if
if trasmissione <> "" then
objRs("trasmissione") = trasmissione
'response.write("fuori il secondo") & "
"
end if
if km <> "" then
objRs("km") = km
'response.write("fuori il secondo") & "
"
end if
if cv <> "" then
objRs("cv") = cv
'response.write("fuori il secondo") & "
"
end if
if cilindrata <> "" then
objRs("cilindrata") = cilindrata
'response.write("fuori il secondo") & "
"
end if
if revisione <> "" then
objRs("revisione") = revisione
'response.write("fuori il secondo") & "
"
end if
if info <> "" then
objRs("info") = info
'response.write("fuori il secondo") & "
"
end if
if equipag <> "" then
objRs("equipag") = equipag
'response.write("fuori il secondo") & "
"
end if
response.write (" inserimento avvenuto con successo ")
objRS.update
objRS.close
set objRS = nothing
objConn.close
set objConn = nothing
%>
mi puoi dare una mano ?
lo script e' molto semplice ..