Microsoft VBScript 运行时错误 '800a01fa' 大家帮帮忙!谢谢!
Microsoft VBScript 运行时错误 '800a01fa'
类没有被定义: 'upload_3Rom'
\admin\pro_us1.asp, line 87
--------------------------------------------
Host by NetBox Version 2.8 Build 4128
我的ASP怎么改呢。谢谢!好郁闷,不知道那错了。
[最优解释]
提示很清楚呀,upload_3Rom未定义
[其他解释]
恩谢谢,可我在upload.asp里定义了啊!
<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>
dim upfile_3Rom_Stream
Class upload_3Rom
dim Form,File,Version
再在pro_us1.asp里include了
<!--#include file="../inc/upload.asp" -->
<%
dim upload,file,formName,formPath,iCount,strFileName
set upload=new upload_3Rom ''建立上传对象
'建立文件系统对象
set hNowFolder = server.createobject("scripting.filesystemobject")
'建对象目录
strWebPath = "../UpImages" & "/" & year(now) & month(now)
strNowFolder = Server.MapPath(strWebPath)
if not hNowFolder.FolderExists(strNowFolder) then '不存在建立之
hNowFolder.CreateFolder(strNowFolder)
if Err.number > 0 then
ErrMsg = "在建立目录:" & strNowFolder & "时, " & Err.Description
end if
end if
[其他解释]
急死了,照着网上的改也不行啊!
[其他解释]
网上说
Microsoft VBScript 运行时错误 错误 '800a01fa'
类没有被定义: 'upload_5xSoft'...
BAIDU一下.终于找到原因:原来是化境无组件上传.
因为我的IIS出错,所以用NETBOX调试ASP.NETBOX不支持
<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT> 这样的语句.
只要把<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>...</script>语句改为<% ...%>就大功告成了!!
我试了不行啊!怎么办啊!!!!!!
[其他解释]
该回复于2011-01-06 13:39:35被版主删除
[其他解释]
天杀的,我今天 也遇到了这样的问题,不过原因是两个文件的编码方式不一样,一个是ANSI,一个是UTF-8,两者有包含关系,所以不能识别,就报错了。