Question

ASP变量未定义问题

Microsoft VBScript 运行时错误 (0x800A01F4)
变量未定义: 'diserror'
/admin/admin_pic.asp, 第 113 行
错误是这个，
if cint(picisbest)=1 then
rs("isbest")=cint(picisbest)
end if
rs("author")=LOGINUSERNAME
rs("department")=LOGdepartment
rs("writerid")=LOGINUid
if founderr then
call diserror() 113行代码
response.end
else
rs.update
rs.close
set rs=nothing
conn.Close
Set conn=nothing
response.redirect "admin_pic.asp?action=pic"
end if

帮忙看一下。谢谢，

Answer 1

你把严格定义变量 去掉 或者 DIM diserror就可以了

Answer 2

diserror这是一个函数 你看看是不是没有把函数包含进去

Answer 3

这不是变量未定义，asp使用变量之前可以不定义的
这是调用一个函数，函数没定义，可能没有引用包含文件

Answer 4

查一下你代码中有没有：
function diserror()
.....
End Function

或：
Sub diserror()
....
End Sub

没有的话就会出错啦

Answer 5

call diserror() 是个函数

没有包含进去