Sono su aruba.it con Hosting Win 2000.... PERCHè MI VIENE QUESTO ERRORE?


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

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

/modifica-dati2.asp, line 24






il codice di modifica-dati2.asp è:

<%
dim intCodice
intCodice = request("Id")
if intCodice<>"" then
%>
<HTML>
<HEAD>
<TITLE>Modifica Record</TITLE>
</HEAD>
<BODY>
<%
dim strCode
strCode="innovatel"
dim intVolta
intVolta="0"
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("mdb-database/immobiliFI.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * FROM immobili WHERE Id="&intCodice
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
%>

<FORM METHOD=POST ACTION="modifica-dati3.asp?Id=<%=rs(0)%>">
<TABLE>
<TR>
<TD>tipo_imm</TD>
<TD><INPUT TYPE="text" NAME="tipo_imm" value="<%=rs(1)%>"></TD>
</TR>
<TR>
<TD>n_vani</TD>
<TD><INPUT TYPE="text" NAME="n_vani" value="<%=rs(2)%>"></TD>
</TR>
<TR>
<TD>indirizzo</TD>
<TD><INPUT TYPE="text" NAME="indirizzo" value="<%=rs(3)%>"></TD>
</TR>
<TR>
<TD><INPUT TYPE="submit" value="Modifica"></TD>
<TD></TD>
</TR>
</TABLE>
</FORM>
<%
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
</BODY>
</HTML>
<%
else
response.redirect "modifica-dati.asp"
end if
%>