楼主

问题点数：0 回复次数：1

很奇怪，这个程序只能在那一台服务器上执行，其它的服务器都会出现下面的错误

很奇怪，这个程序只能在那一台服务器上执行，其它的服务器都会出现下面的错误：

我问页面作者，他说是在纯IIS下做的，并无其它组件什么的，呵！

<%

Set obj=Server.CreateObject("LyfUpload.UploadFile") obj.extname="gif,jpg,swf" file_name=obj.SaveFiletodb("file1") file_type=right(file_name,4)

upfile_name=obj.request("photo") if upfile_name="" then upfile_name=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now) upfile_name=upfile_name&file_type end if

ss=obj.SaveFile("file1",Server.MapPath("../upfile"),true,upfile_name) aa=obj.filetype("file1")

if ss="" then upfile_name=obj.request("photo") elseif ss= "1" then %> <script language="JavaScript"> MM_popupMsg('错误，文件格式必须为gif/jpg！') </script> <meta http-equiv="Refresh" content="0; URL=news_admin.asp"> <% response.end end if

rs.open"select * from news where id="&obj.request("id")&"",conn,2,2 rs("title")=obj.request("title") rs("content")=obj.request("content")

if isdate(obj.request("write_time")) then rs("write_time")=obj.request("write_time") else rs("write_time")=date() sign=obj.request("sign") if sign="" then sign="news"

if obj.request("delphoto")="del" then rs("photo")="null" else rs("photo")=upfile_name&file_type

if sign="popup" then if obj.request("popup")="true" then rs("popup")=1 else rs("popup")=0 end if rs.update rs.close %> <script language="VBScript"> Msgbox "提交成功！" </script> <% response.write "<meta http-equiv='Refresh' content='0; URL=news_admin.asp?sign="&sign&"'>" %>

------------------结果：------------------

本页无法显示

试图访问的网页出现问题，无法显示。

请尝试以下方法：

单击刷新按钮或者梢候再试。
打开 localhost 主页，然后查找与所需信息相关的链接。

HTTP 500.100 - 内部服务器错误 - ASP 错误 Internet 信息服务

技术信息（适用于支持人员）

错误类型：服务器对象, ASP 0177 (0x800401F3) 无效的 ProgID。若要获取关于此消息的更多的信息，请访问 Microsoft 联机支持站点: http://www.microsoft.com/contentredirect.asp 。 /sunwave/admin/view_news_up.asp, 第 4 行

浏览器类型： Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)

页： POST 2693 bytes to /sunwave/admin/view_news_up.asp

POST 数据: . . .

时间： 2004年8月16日, 9:16:21

详细信息： Microsoft 支持

搜索更多相关主题的帖子: 服务器　 IIS　obj　