首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

Microsoft VBScript 运行时异常 '800a01fa' 大家帮帮忙!多谢

2012-12-26 
Microsoft VBScript 运行时错误 �'大家帮帮忙!谢谢!Microsoft VBScript 运行时错误 80

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,两者有包含关系,所以不能识别,就报错了。

热点排行