Ragazzi sono ormai 3 giorni che sbatto la testa su questo problema, vi posto le due pagine che ho realizzato dopo aver seguito la guida completa alle ASP di html.it
La prima pagina assume i valori da form e la seconda li dovrebbe scrivere su DB.
PAGINA 1
<%
dim intCodice
intCodice = request("codrespo")
if intCodice<>"" then
%>
<HTML>
<HEAD>
<TITLE> Modifica Responsabile</TITLE>
</HEAD>
<BODY>
<%
dim strCode
strCode="innovatel"
dim intVolta
intVolta="0"
dim conn
dim rs
dim strsql
dim strconn
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("mdb-database/daniele.mdb")
strconn=strconn & ";pwd=" & strCode
set conn = server.createobject("adodb.connection")
conn.open strconn
strsql = "SELECT * FROM respo WHERE codrespo="&intCodice
set rs = server.createobject("adodb.recordset")
rs.open strsql, conn
%>
<FORM METHOD=POST ACTION="modifica3.asp?codrespo=<%=rs(0)%>">
<TABLE>
<TR>
<TD>Responsabile</TD>
<TD><INPUT TYPE="text" NAME="r" value="<%=rs(1)%>"></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 "responsabili.asp"
end if
%>
--------------------------------------------------------
PAGINA 2
<%
dim intCodice
intCodice = request("codrespo")
if intCodice<>"" then
dim strCode
strCode="innovatel"
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("mdb-database/daniele.mdb")
strconn=strconn & ";pwd=" & strCode
set conn = server.createobject("adodb.connection")
conn.open strconn
strsql = "SELECT * FROM respo WHERE codrespo=&intCodice"
set rs = server.createobject("adodb.recordset")
rs.open strsql, conn
rs(1)=request.form("r")
rs.update
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
<HTML>
<HEAD>
<TITLE> Aggiornamento Dati </TITLE>
</HEAD>
<BODY>
<TABLE width="100%" height="100%" valign="middle">
<TR>
<TD><center>
<TABLE>
<TR>
<TD><CENTER>Aggiornamento eseguito correttamente</CENTER></TD>
</TR>
<TR>
<TD><CENTER>Verifica Le Modifiche</CENTER></TD>
</TR>
</TABLE>
</center></TD>
</TR>
</TABLE>
</BODY>
</HTML>
<%
else
response.redirect "responsabili.asp"
end if
%>
------------------------------------------------
Vi ringrazio tantissimo.