Ciao a tutti..
Non riesco a visualizzare questa pagina in asp.. Qualcuno sa dirmi se c'è un errore nel codice?

codice:
<%
dim intCodice
intCodice = request("Id")
if intCodice <> "" then
%>
<HTML>
<HEAD>
<TITLE> Modifica Un Libro Immesso</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("libreria.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * FROM libri WHERE Id="&intCodice
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
%>
<FORM METHOD=POST ACTION="modifica3.asp?Id=<%=rs(0)%>">
<TABLE>
<TR>
<TD>Titolo</TD>
<TD><INPUT TYPE="text" NAME="titolo" value="<%=rs(1)%>"></TD>
</TR>
<TR>
<TD>Autore</TD>
<TD><INPUT TYPE="text" NAME="autore" value="<%=rs(2)%>"></TD>
</TR>
<TR>
<TD>Genere</TD>
<TD><INPUT TYPE="text" NAME="genere" 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 "modifica1.asp"
end if
%>
Grazie.
.Fakkio.