....................................................................................................
Version="无组件上传类 Version 0.96"
set Form = Server.CreateObject("Scripting.Dictionary")
set File = Server.CreateObject("Scripting.Dictionary")
if Request.TotalBytes < 1 then Exit Sub
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) 第24行
oUpFileStream.Position=0
RequestBinDate = oUpFileStream.Read
iFormEnd = oUpFileStream.Size
bCrLf = chrB(13) & chrB(10)

后面的代码没写了
....................................................................................................

上传文件的时后 为什么在1M以下的能够上传 1M以上就不可以 提示的错误是：

Request 对象 错误 'ASP 0104 : 80004005'

不允许操作

/admin/upload_wj.inc,行 24

谁能告诉我怎么解决这个问题。谢谢了

[此贴子已经被作者于2006-3-22 9:32:46编辑过]