蒙特利尔17英里海岸线:ADODB.Recordset 错误 \'800a0bb9\'

<%case "editok"
dim text111,sql111,weizhi111,iddd,rsnew2,sql2
text111=replace(request.Form("textfield"),"'","")
weizhi111=replace(request.Form("weizhi"),"'","")
iddd=replace(request.querystring("id"),"'","")
set rsnew2=server.CreateObject("adodb.recordset")
sql111="select * form class1 where id="&iddd
rsnew2.open conn,sql111,1,1
sql2="update class1 set class='"&textfield&"',weizhi='"&weizhi&"',shunxu='"&shunxu&"' where id="&iddd
conn.execute sql2
rsnew2.close
set rsnew2=nothing
response.write("<script>alert('修改分类成功!');window.location.href='class1.asp'</script>")%>
id在数据库里是自动编号
<%case "editok"
dim text111,sql111,weizhi111,iddd,rsnew2,sql2
text111=replace(request.Form("textfield"),"'","")
weizhi111=replace(request.Form("weizhi"),"'","")
iddd=replace(request.querystring("id"),"'","")
shunxu=replace(request.form("shunxu"),"'","")
set rsnew2=server.CreateObject("adodb.recordset")
sql111="select * form class1 where id="&iddd
rsnew2.open sql111,conn,1,1
sql2="update class1 set class='"&text111&"',weizhi='"&weizhi111&"',shunxu='"&shunxu&"' where id="&iddd
conn.execute sql2
rsnew2.close
set rsnew2=nothing
response.write("<script>alert('修改分类成功!');window.location.href='class1.asp'</script>")%>

错误变了.
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e21'

ODBC 驱动程序不支持所需的属性。

/new/vote/class1.asp，行 134
134行就是rsnew2.open sql111,conn,1,1