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

今天遇到了一起关于ASP编程中的入库问题，提示了Microsoft VBScript运行时错误，错误代码为800a01f5，表现为“非法赋值”。问题的关键在于变量名“sitename”，在将其更名为“sitename2”后，问题得到了解决。

深入分析，这个问题可能与ASP的一些保留字段有关。当你在编写代码时，有些变量名或字段名可能与ASP的保留关键字冲突，导致出现这种非法赋值的错误。

具体到这次遇到的错误，代码本身似乎没有问题，ID也有值，数据库也换成了SQL SERVER。但由于不常使用，所以在执行过程中出现了这个错误。错误的代码行位于/admin/list/savedate.asp文件的第60行，具体错误代码为“SQLstr="delete d_31 where id="&id&""”。

针对这个问题，解决方案是更改变量名。将SQLstr改为sqlssqls，并调整SQL语句的写法。新的代码示例如下：

```asp

<%

'删除小类信息

sub delbuy()

id=clng(Request.QueryString("id"))

dim sqlssqls '定义新的变量名

sqlssqls = "delete from d_31 where id=" & clng(id) '调整SQL语句的写法

conn.Execute(sqlssqls) '执行SQL语句

set conn=nothing '关闭连接

end sub

%>

```

通过更改变量名和调整SQL语句的写法，成功解决了Microsoft VBScript运行时错误。这也提醒我们在编写代码时，要注意避免使用可能被解释为保留字段或关键字的变量名和字段名，以减少类似问题的发生。对于不常用的代码和数据库，也要定期进行复习和测试，以确保其正常运行。

代码中的其他部分，如使用msgbox弹出提示框和window.location.href重定向页面等操作，都保持了原有的功能和样式，使得用户在操作过程中的体验得以保留。这也体现了在解决问题时，既要注重功能性，也要兼顾用户体验的原则。