asp kodda hatayı bulamıyorum

 
<%

Set Baglantimiz = Server.CreateOBject("adodb.connection")
baglantimiz.open "Driver={Microsoft Access Driver (*.mdb)}; dbq=" & server.mappath("xx.mdb")

duzenleid = Request.Form("duzenleid")
 
Set kayit = Server.CreateOBject("adodb.recordset")
sql="select yazi From veri where id" &duzenleid& " "
kayit.open sql , Baglantimiz , 1,3
kayit("yazi") = Request.Form("yazi")
kayit.Update
kayit.close
Set kayit = Nothing
Response.Write "Yeni Kayıt Güncellendi"
%>

Hata Tipi:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][ODBC Microsoft Access Sürücüsü] Çok az parametre. 1 bekleniyor.
/muratsoft/gonder.asp, line 14