服务器之家:专注于服务器技术及软件下载分享
分类导航

PHP教程|ASP.NET教程|Java教程|ASP教程|编程技术|正则表达式|C/C++|IOS|C#|Swift|Android|JavaScript|易语言|

服务器之家 - 编程语言 - ASP教程 - ASP 提示非法赋值的解决方法

ASP 提示非法赋值的解决方法

2019-06-29 15:58ASP之家 ASP教程

今天在写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)

延伸 · 阅读

精彩推荐