请教大家一个关于iis的问题??
有一个网站是用asp+access做的,本机的配置是winxp＋iis５.1,而服务器的配置是win2003＋iis6.0，在本机可以上传htm文件，文件大小是２６２k，里面内容是表格，而在服务器上却不能上传该文件！！不知道什么原因？？
在服务器上报的错如下：
Request   对象   错误   'ASP   0104   :   80004005 '  

不允许操作  

/upload.inc，行   61  
上传的代码如下：
upload.inc：
<%
'----------------------------------
'转发时请保留此声明信息,这段声明不并会影响你的速度!
'*******************       无惧上传类   V1.0     ************************************
'作者:梁无惧
'网站:http://www.25cn.com
'电子邮件:yjlrb@21cn.com
'版权声明:版权所有,源代码公开,各种用途均可免费使用,但是修改后必须把修改后的文件
'发送一份给作者.
'**********************************************************************
'----------------------------------
Dim   oUpFileStream

Class   UpFile_Class

Dim   Form,File,Version,Err  

Private   Sub   Class_Initialize
  Version   =   "无惧上传类   Version   V1.0 "
  Err   =   -1
End   Sub

Private   Sub   Class_Terminate    
    '清除变量及对像
    If   Err   <   0   Then
        Form.RemoveAll
        Set   Form   =   Nothing
        File.RemoveAll
        Set   File   =   Nothing
        oUpFileStream.Close
        Set   oUpFileStream   =   Nothing
    End   If
End   Sub
     
Public   Sub   GetDate   (RetSize)
      '定义变量
    Dim   RequestBinDate,sSpace,bCrLf,sInfo,iInfoStart,iInfoEnd,tStream,iStart,oFileInfo
    Dim   iFileSize,sFilePath,sFileType,sFormValue,sFileName
    Dim   iFindStart,iFindEnd
    Dim   iFormStart,iFormEnd,sFormName
      '代码开始
    If   Request.TotalBytes   <   1   Then
        Err   =   1
        Exit   Sub
    End   If
    If   RetSize   >   0   Then  
        If   Request.TotalBytes   >   RetSize   Then
        Err   =   2
        Exit   Sub
        End   If
    End   If
    Set   Form   =   Server.CreateObject   ( "Scripting.Dictionary ")
    Form.CompareMode   =   1
    Set   File   =   Server.CreateObject   ( "Scripting.Dictionary ")
    File.CompareMode   =   1
    Set   tStream   =   Server.CreateObject   ( "ADODB.Stream ")
    Set   oUpFileStream   =   Server.CreateObject   ( "ADODB.Stream ")
    oUpFileStream.Type   =   1
    oUpFileStream.Mode   =   3
    oUpFileStream.Open  
    oUpFileStream.Write   Request.BinaryRead   (Request.TotalBytes)
    oUpFileStream.Position   =   0
    RequestBinDate   =   oUpFileStream.Rea