<%
Dim rsView__MMColParam
rsView__MMColParam = "1"
If (Request.QueryString("ID") <> "") Then
rsView__MMColParam = Request.QueryString("ID")
End If
%>
<% DELETE book WHERE ID=rsView__MMColParam %>
这段代码的错误信息是：

Microsoft VBScript 编译器错误 错误 '800a0401'

语句未结束

/dwmx2004/deltishi2.asp，行54

DELETE book WHERE ID=rsView__MMColParam
------------^

请教怎么改正，谢谢！

<% DELETE book WHERE ID="&rsView__MMColParam %>

又是用DW生成的代码