烧饼大全:ASP代码出错

<% set a=server.createobject("adodb.recordset")
set b=server.createobject("adodb.connection")
randomize
q=int((rnd*49)+1)

a.open "select * form 五十音 where dy='0'","dsn=longer;"
if (not a.eof) then
i=a("id")
b.open "dsn=longer;"
b.execute(update 五十音 set dy='1' where dy='0')
b.close
response.write a("声")&" "&a("韵")
else
i=q
end if

a.close
a.open "select * form 五十音 where id=i","dsn=longer;"
response.write a("字")&" "&a("平")
a.close

%>
<br>
<a href="m.asp?theid=<% i %>">看读音</a>

-------------------------------------------
技术信息（用于支持人员）

错误类型：
Microsoft VBScript 编译器错误 (0x800A0408)
无效字符
/50y2.asp, line 10, column 17
b.execute(update 五十音 set dy='1' where dy='0')
----------------^

浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; Maxthon)

网页：
GET /50y2.asp

时间：
2006年3月5日, 11:09:28

详细信息：
Microsoft 支持

----------------------------------------

初次涉猎ASP,请高手多包涵,若有其他错误也一并指出,谢谢.