分析可能是： asp的一些保留字段导致，具体的大家可以参考这篇文章：ASP常见的保留字整理

正常来说 代码没问题```ID也有值 但是库改成了SQL SERVER库 因不长用所以请教各位这个错误是哪里问题

Microsoft VBScript 运行时错误 错误 '800a01f5'

非法赋值: 'SqlStr'

/admin/list/savedate.asp，行60

错误行代码 SQLstr="delete d_31 where id="&id&""

复制代码 代码如下:
<%
'删除小类信息
sub delbuy()
id=clng(Request.QueryString("id"))
Set book=server.createobject("adodb.recordset")
SQLstr="delete d_31 where id="&id&""
conn.Execute SQLstr
set book=nothing
conn.close
set conn=nothing
%>
<SCRIPT LANGUAGE=vbscript>
<!--
msgbox("删除成功!")
window.location.href="buySoScan.asp"
-->
</SCRIPT>
<%
end sub
%>

解决方法：SQLstr 改成sqlssqls

换个变量名试试,还有SQL语句要改一下

复制代码 代码如下:
SQLstr="delete d_31 where id="&id&""
conn.Execute

SQLstr 改成
复制代码 代码如下:
dim sqlssqls = "delete from d_31 where id=" & clng(id)
conn.Execute(sqls)