高手们为什么查寻和更新就出错了 删除没错呢?

<%
dim db
set db=server.CreateObject("adodb.connection")
db.open"DBQ=C:\Inetpub\wwwroot\chapter8\wwwlink.mdb;DRIVER={Driver do Microsoft Access (*.mdb)}"
dim strsql
'strsql="delete from link where link_id=1"
strsql="update link set name='腾讯',into='信息'where name='网易'"
db.execute(strsql)
%>