用LyfUpload上传组件上传时,出现如下错误提示:
LyfUpload 错误 '800a0009'
Subscript out of range
/admin/uploadpic.asp,行 22
如果是中文版的出现的是如下提示:
LyfUpload 错误 '800a0009'
下标越界
/admin/uploadpic.asp,行 22
检查了程序,发现原来是由于前一页没有提交必要的表单值引发的错误。
详细说明下,处理程序如下:
Set obj = Server.CreateObject("LyfUpload.UploadFile")
obj.extname="gif,jpg,bmp"
obj.request("classid")
......
如果此时上一页在form中没有classid的元素,则提交程序运行时,就会出现这个提示。加上<input type="hidden" name="classid" value="1">之后,程序正常运行。