利用流下载ADODB.Stream 出错？？高手急救！！

利用流下载ADODB.Stream 出错？？高手急救！！

我换用这种形式下载了(为了不显示真实下载地址)：
If Response.IsClientConnected Then
Response.AddHeader "Content-Disposition", "attachment; filename=" & f.name
Response.AddHeader "Content-Length", intFilelength
Response.CharSet = "UTF-8"
Response.ContentType = "application/octet-stream"
Response.BinaryWrite Data
Response.Flush
End If

在本地完全没问题，但是放到服务器，有部分文件就下载不了了。用迅雷下载速度一直为零，用浏览器下载(IE,FF)下载下来的文件大小都为0kb，为什么啊？为什么有的可以下载，而有的却不行呢？

我想我知道怎么回事了，因为部分压缩文件的文件头被破坏，所以不能下载，但是我修复好了压缩文件，效果还是一样的，有没有什么办法可以解决没？