文件名称:Asp用大文件上传控件(不占内存)附带Sleep函数
文件大小:4KB
文件格式:RAR
更新时间:2012-08-20 04:19:30
上传 控件 Sleep
运行PflyTools.bat或运行 regsvr32 PflyTools.dll注册控件 AppendFile能直接将每次读取的小段数据写入硬盘,不占用服务器内存,理论上可以上传2G大小的文件 代码示例: Set AppendFile = Server.CreateObject("PflyTools.AppendFile") Set Base = Server.CreateObject("PflyTools.Base") AppendFile.FileName = "d:\1.txt" for i = 1 to 100 AppendFile.Save Request.BinaryRead(100) '实际使用时每段读取50k左右速度比较快 If Not Response.IsClientConnected then '用户关闭或者停止上传窗口了,删除文件,避免留下垃圾 dim objFile set objFile=Server.CreateObject("Scripting.FileSystemObject") if objFile.FileExists(AppendFile.FileName) then Base.Sleep 2000 'Base.Sleep不占用CPU,可以用户其他的不间断通讯程序,例如聊天室 objFile.deleteFile(AppendFile.FileName) end if set objFile=nothing Response.End() end if next Set AppendFile = nothing Set Base = nothing
【文件预览】:
PflyTools.bat
PflyTools.txt
PflyTools.dll