服务器对象 错误 'ASP 0177 : 800401f3' ( 积分: 100 )

我在本地机子上已经能正常调试了，可是传到网上的虚拟空间上就不能上传文件了？？是怎么回事呢？一上传就出现以下错误信息：
服务器对象 错误 'ASP 0177 : 800401f3'
Server.CreateObject 失败
/oa/jxzy/file/file_add.asp，行21
无效的 ProgID。 若要获取关于此消息的更多的信息，请访问 Microsoft 联机支持站点: http://www.microsoft.com/contentredirect.asp 。
我应该在虚拟空间上还要做什么操作呢？我的虚拟空间是在中国频道申请的，我看了一下，虚拟空间上有一项功能是:
程序读写文件权限 Yes/默认FSO
请知道的朋友告诉我好吗？
谢谢！
程序所在地址:
http://www.mdxylyg.com/oa/jxzy/login.asp
可以用student登录！

我在本地机子上已经能正常调试了，可是传到网上的虚拟空间上就不能上传文件了？？是怎么回事呢？一上传就出现以下错误信息：
服务器对象 错误 'ASP 0177 : 800401f3'
Server.CreateObject 失败
/oa/jxzy/file/file_add.asp，行21
无效的 ProgID。 若要获取关于此消息的更多的信息，请访问 Microsoft 联机支持站点: http://www.microsoft.com/contentredirect.asp 。
我应该在虚拟空间上还要做什么操作呢？我的虚拟空间是在中国频道申请的，我看了一下，虚拟空间上有一项功能是:
程序读写文件权限 Yes/默认FSO
请知道的朋友告诉我好吗？
谢谢！
程序所在地址:
http://www.mdxylyg.com/oa/jxzy/login.asp
可以用student登录！

因为你的控件没有注册
我猜测你没有注册控件，或者是没有权限使用FSO
一般空间都会关闭这些功能，网上有专门的代码是无组件上传的，可以考虑一下
我转了一段代码
目前有很多无组件上传类，我大概看了一下，大多写的相当复杂，有的居然还只能传文本
最关键的是没有10行代码以下的 ：）
我花了一个晚上时间研究了一下ADODB.Stream，并且用了6行代码实现了无组件上传：
strFileName = Request.QueryString("file1&quot
Set objStream = Server.CreateObject("ADODB.Stream&quot
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile strFileName
objStream.SaveToFile Server."123_onweb.gif",2
使用方法：
把上面的代码写成upload.asp
在浏览器里面输入：
http://XXX/upload.asp?file1=c:/上传文件/123.gif
XXX为你的主机地址
执行完后你会看到你的目录下面多了一个123_onweb.gif
他就是你要文件拉！！！！
根据原理我们可以扩展以下代码：
upload.asp文件
<%
Function GetFileName(ByVal strFile)
If strFile <> &quot;&quot;
then
GetFileName = mid(strFile,InStrRev(strFile, &quot;/&quot+1)
else
GetFileName = &quot;&quot;
End If
End function
strFileName = Request.Form(&quot;file1&quot
Set objStream = Server.CreateObject(&quot;ADODB.Stream&quot
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile strFileName
objStream.SaveToFile Server.MapPath(GetFileName(strFileName)),2
objStream.Close
%>
upload.htm文件
<form name=&quot;FORM&quot;
action=&quot;upload.asp&quot;
method=&quot;post&quot;>
　　<input type=&quot;submit&quot;
name=&quot;submit&quot;
value=&quot;OK&quot;>
<input type=&quot;file&quot;
name=&quot;file1&quot;
style=&quot;width:400&quot;
value=&quot;&quot;>
</form>