网站word文件无法下载，求助

我用VS2005做的网站，点击下载按钮下载一个word文件，可是下载的时候弹出下载对话框后，等了很长时间才下载下来，而且下载下来的word文件里的内容是一些错误信息，错误信息如下：
“/”应用程序中的服务器错误。
__________________________
要求正数。
参数名: bufferSize 
说明: 执行当前 Web 请求期间，出现未处理的异常。请检查堆栈跟踪信息，以了解有关该错误以及代码中导致错误的出处的详细信息。 异常详细信息: System.ArgumentOutOfRangeException: 要求正数。
参数名: bufferSize源错误: 
执行当前 Web 请求期间生成了未处理的异常。可以使用下面的异常堆栈跟踪信息确定有关异常原因和发生位置的信息。 堆栈跟踪: 
[ArgumentOutOfRangeException: 要求正数。
参数名: bufferSize]
   System.IO.FileStream.Init(String path, FileMode mode, FileAccess access, Int32 rights, Boolean useRights, FileShare share, Int32 bufferSize, FileOptions options, SECURITY_ATTRIBUTES secAttrs, String msgPath, Boolean bFromProxy) +7479159
   System.IO.FileStream..ctor(String path, FileMode mode, FileAccess access, FileShare share, Int32 bufferSize, FileOptions options, String msgPath, Boolean bFromProxy) +61
   System.IO.FileStream..ctor(String path, FileMode mode, FileAccess access, FileShare share, Int32 bufferSize, Boolean useAsync) +57
   Kangle.Web.KangleWorkerRequest.SendResponseFromFile(String filename, Int64 offset, Int64 length) +53
   System.Web.HttpFileResponseElement.System.Web.IHttpResponseElement.Send(HttpWorkerRequest wr) +89
   System.Web.HttpWriter.Send(HttpWorkerRequest wr) +84
   System.Web.HttpResponse.Flush(Boolean finalFlush) +965
   System.Web.HttpResponse.Flush() +16
   System.Web.HttpWriter.WriteFile(String filename, Int64 offset, Int64 size) +106
   System.Web.HttpResponse.WriteFile(String filename, Boolean readIntoMemory) +232
   System.Web.HttpResponse.WriteFile(String filename) +15
   gaojianpage.Button2_Click(Object sender, EventArgs e) +420
   System.Web.UI.WebControls.Button.OnClick(EventArgs e) +78
   System.Web.UI.WebControls.Button.RaisePostBackEvent(String eventArgument) +100
   System.Web.UI.WebControls.Button.System.Web.UI.IPostBackEventHandler.RaisePostBackEvent(String eventArgument) +10
   System.Web.UI.Page.RaisePostBackEvent(IPostBackEventHandler sourceControl, String eventArgument) +13
   System.Web.UI.Page.RaisePostBackEvent(NameValueCollection postData) +36
   System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint) +2863
我的下载代码如下：
    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click            Dim filename As String
            filename = "lwmb" + ".DOC"
            Dim filepath As String = Server.MapPath(filename)
            Dim fileinfo As New FileInfo(filepath)
            Response.Clear()
            Response.ClearContent()
            Response.ClearHeaders()
            Response.AddHeader("Content-Disposition", "attachment;filename=" + System.Web.HttpUtility.UrlEncode(filename, System.Text.Encoding.UTF8))
            Response.AddHeader("Content-Length", fileinfo.Length.ToString())
            Response.AddHeader("Content-Transfer-Encoding", "binary")
            Response.ContentType = "application/msword"
            Response.Charset = "UTF-8"
            Response.ContentEncoding = System.Text.Encoding.Default
            Response.WriteFile(fileinfo.FullName)
            Response.Flush()
            Response.End()
           
    End Sub