今天在写asp的时候入库提示Microsoft VBScript 运行时错误 错误 800a01f5 非法赋值: sitename,经改名sitename2问题解决
分析可能是: 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)
|