日期:2014-05-17  浏览次数:20665 次

对象不支持此属性或方法: 'form'
<%
dim   arr(3)
dim   upload,file,formName,formPath,iCount,filename,fileExt,i
set   upload=new   upload_5xSoft   ' ' ' '建立上传对象

formPath=upload.form( "filepath ")
' ' ' '在目录后加(/)
if   right(formPath,1) <> "/ "   then   formPath=formPath& "/ "  
iCount=0
i=0
for   each   formName   in   upload.file   ' ' ' '列出所有上传了的文件
12行//////set   file=upload.file(formName)   ' ' ' '生成一个文件对象

if   file.filesize <0   then
response.write   " <font   size=2> 请先选择你要上传的图片 [   <a   href=#   onclick=history.go(-1)> 重新上传 </a> ] </font> "
response.end
end   if
Microsoft   VBScript   运行时错误   (0x800A01B6)
对象不支持此属性或方法:   'form '
/upfile.asp,   第   12   行
谁指教一下该怎么修改

------解决方案--------------------

在upfile.asp中,将表单中按钮的名称submit修改为submit1或其他,只要不是submit的一个合法名称即可。