C#/Asp.net 结合 Delphi 实现大文件的断点续传 [Chukeh.dll]

最近手上的一个项目需要经常的应对大于 2GB 以上文件的上传及管理，目前的.net系统虽然可以上传大于 2GB 的文件，但是由于 Http 上传不是特别稳定，所以一旦中断，或者中途无响应，那就需要从头重新传一次，这对用户确实非常不友好，所以决定在不对 .net 系统做大改动的前提下，借助 delphi 开发客户端来实现断点续传。基本思路是，由 delphi 把要上传的文件分块，然后用 idhttp 模拟 post 请求，提交文件块，.net 以 Request.Files 方式接收数据，然后根据同时提交的 position 和 block 参数写入临时文件，上传完毕后再重名名文件，这样客户端只要记下最后的 position 参数，就可以在任意位置开始续传文件了。您可以到这里下载示例代码 http://www.easyfrms.com/easy/chukeh/Chukeh_1_2_0.rar
[解压后的Samples\Upload Sample目录]
http://www.easyfrms.com/easy 这里有实际的应用效果具体代码如下：Delphi 客户端  定义全局变量
GLOBAL_POSITION: Int64; // 记录上传进度
GLOBAL_TASK: TUploadFile; // 上文文件线程对象

启动下载文件
GLOBAL_TASK:= TUploadFile.Create(Edit2.Text, Edit1.Text);
try
GLOBAL_TASK.Resume;
except
// 启动文件上传错误，无法启动线程
end;
暂停下载文件
if Assigned(GLOBAL_TASK) then begin
try
GLOBAL_TASK.Pause;
except
// 暂停文件上传错误，无法暂停线程
end;
取消下载文件
if Assigned(GLOBAL_TASK) then begin
try
GLOBAL_TASK.Cancel;
except
// 暂停文件上传错误，无法暂停线程
end; TUploadFile 的源代码，请下载上面的示例代码 (抱歉，论坛不允许内容太长)C#.Net 服务端
                try
                {
                    int _Block = Convert.ToInt32(this.Request.Params["Block"]);
                    long _Size = Convert.ToInt64(this.Request.Params["Size"]);
                    long _Position = Convert.ToInt64(this.Request.Params["Position"]);
                    string _FileName = Path.GetFileName(this.Request.Files["FileData"].FileName);
    // 这里我使用了 Chukeh.Net 这个类，这个方法的实现代码见下
                    Chukeh.Current.SavePostedFile(Context.Server.MapPath(_FileName), true, "FileData", _Size, _Position, _Block);
                    Context.Response.Write("0");
                }
                catch
                {
                    Context.Response.Write("1");
                }        /// <summary>
        /// 保存提交的文件数据到指定位置[流方式，用于实现断点续传]
        /// </summary>
        /// <param name="FileName">string 文件保存位置</param>
        /// <param name="CreateDirectory">bool 是否创建文件夹</param>
        /// <param name="PostedFile">string 提交的文件参数名称</param>
        /// <param name="Size">long 文件尺寸</param>
        /// <param name="Position">long 进度</param>
        /// <param name="Block">int 流大小</param>
        /// <returns>Data.CResult 保存结果</returns>
        public static Data.CResult SavePostedFile(string FileName, bool CreateDirectory, string PostedFile, long Size, long Position, int Block)
        {
            if (HttpContext.Current.Request.Files[PostedFile] == null || HttpContext.Current.Request.Files[PostedFile].InputStream == null || HttpContext.Current.Request.Files[PostedFile].InputStream.Length <= 0)
            {
                return new Chukeh.Data.CResult(5, "提交了空数据，无法执行保存");
            }
            else
            {
                string _TempFileName = FileName + ".tmp";
                if (Position == 0)
                {
                    if (!Directory.Exists(Path.GetDirectoryName(_TempFileName)) && CreateDirectory)
                    {
                        Directory.CreateDirectory(Path.GetDirectoryName(_TempFileName));
                    }
                    if (Directory.Exists(Path.GetDirectoryName(_TempFileName)))
                    {
                        FileStream _FileStream = new FileStream(_TempFileName, FileMode.Append);
                        _FileStream.Close();
                        _FileStream.Dispose();
                    }
                    else
                    {
                        return new Chukeh.Data.CResult(4, "目标保存路径不存在或已删除");
                    }
                }
                if (Position > Size)
                {
                    IO.CFile.FileDelete(_TempFileName);
                    return new Chukeh.Data.CResult(3, "提交的数据流超出文件范围");
                }
                if (File.Exists(_TempFileName))
                {
                    byte[] _Buffer = new byte[Block];
                    FileStream _FileWriter = new FileStream(_TempFileName, FileMode.Open, FileAccess.ReadWrite);
                    if (_FileWriter.Length > Position)
                    {
                        _FileWriter.Position = Position;
                    }
                    else
                    {
                        _FileWriter.Seek(0, SeekOrigin.End);
                    }
                    HttpContext.Current.Request.Files[PostedFile].InputStream.Read(_Buffer, 0, _Buffer.Length);
                    _FileWriter.Write(_Buffer, 0, _Buffer.Length);
                    _FileWriter.Close();
                    _FileWriter.Dispose();
                    if (Position + Block >= Size)
                    {
                        File.Move(_TempFileName, FileName);
                        return new Chukeh.Data.CResult(0, "保存数据流成功，文件已保存完毕");
                    }
                    else
                    {
                        return new Chukeh.Data.CResult(1, "保存数据流成功，已写入文件 " + Base.ToSize(Position + Block));
                    }
                }
                else
                {
                    return new Chukeh.Data.CResult(2, "保存数据流失败，无法写入流至文件");
                }
            }
        }