modificar datos

[asdrual]

buenas a todos los del foro.
estoy empesando en la programacion con asp. pero no e podido modificar datos este es el codigo que e utilizado pero no me hace nada , alguien lo revisaria a ver en donde esta el error o que estoy haciend mal.

<%
'Creamos la conexión y el recordset
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
'Abrimos la conexión por DNS
id=Request.Form("id")
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("base.mdb")
sqltext ="SELECT * FROM tabla WHERE id='" & id & "'"
rst.Open sqltext,cnn,1,3
On Error Resume Next
If rst.BOF And rst.EOF Then
'Modificamos los datos
rst("id")=Request("dato1")
rst("nombre")=Request("dato2")
rst("fecha")=Request("dato3")
rst("ip")=Request("dato4")
rst.update
'Cerramos el recordset y la conexión
rst.Close
set rst = Nothing
cnn.Close
set cnn = Nothing
End If
%>