hola tengo el siguiente codigo:
1 pagina
<HTML>
<HEAD>
<TITLE>Actualizar1.asp</TITLE>
</HEAD>
<BODY>
<div align="center">
<h1>Actualizar un registro</h1>
<br>
<%
Set Db = CreateObject("ADODB.Connection")
Set Rs = CreateObject("ADODB.RecordSet")
Db.Open "DSN=Agenda"
%>
<FORM METHOD="POST" ACTION="actualizar2.asp">
Nombre<br>
<select id="nombre">
<%
if Rs.state then Rs.close
SqlSrt="Select * From Contactos Where Nombre Order By nombre"
Rs.open SqlSrt, db
Do while Not Rs.EOF
Response.write "<option>"& Rs("Nombre")&"</option>"& vbNewLine
Rs.MoveNext
loop
%>
</select>
<br>
Teléfono<br>
<input id='telefono' type="text"><br>
<input type="button" value="Enviar" onclick="enviadata()">
</FORM>
</div>
</BODY>
</HTML>
<script>
function enviadata(){
var nombre=document.getElementById('nombre').value;
var telefono=document.getElementById('telefono').value ;
var Ruta='actualizar2.asp?nombre='+nombre+'&telefono=' +telefono;
document.location=Ruta;
}
</script>
2 pagina
<%
set db = CreateObject("ADODB.Connection")
set Rs = CreateObject("ADODB.Recordset")
db.open "DSN=Agenda"
SqlStr="Update Contactos(Nombre,TelefonoOfi) values('" & Request("nombre") & "','" & Request("telefono") &"')"
if rs.state then rs.close
Response.write SqlStr
Rs.open SqlStr,db
Response.redirect "Actualizar.asp"
%>
y me marca en la segunda pagina error en la sentencia update y no entiendo por que no se si me podrian ayudar cual es mi error o como es la setencia update espero su ayuda