很多时候我们写的asp程序会因为做很多操作，所以会花上一分钟甚至几分钟时间。为了使软件使用者能够耐心的等待程序的执行，我们经常会希望有一个进度条来表示程序执行的状态。或者最起码要显示一个类似： “数据载入中”，“正在保存数据” 等的说明性文字。此时我们就会用到Response.flush()。他会将缓冲区中编译完成的数据先发送到客户端。
但是有很多时候，我们发现即使我们使用了Response.Flush()，但是并没有将前面的信息发到客户端来显示。呈献给我们的依然是白屏。经过反复的测试，我得出一个结论（仅代表个人观点，可随意引用，但后果自负）。就是flush的内容至少要有256字节。也就是只有编译产生了至少256字节的数据，才能在执行Response.Flush()以后将信息发到客户端并显示。
（１）Flush的内容至少要有256字节
很多时候我们写的asp程序会因为做很多操作，所以会花上一分钟甚至几分钟时间。为了使软件使用者能够耐心的等待程序的执行，我们经常会希望有一个进度条来表示程序执行的状态。或者最起码要显示一个类似： “数据载入中”，“正在保存数据” 等的说明性文字。此时我们就会用到Response.flush()。他会将缓冲区中编译完成的数据先发送到客户端。
但是有很多时候，我们发现即使我们使用了Response.Flush()，但是并没有将前面的信息发到客户端来显示。呈献给我们的依然是白屏。经过反复的测试，我得出一个结论（仅代表个人观点，可随意引用，但后果自负）。就是flush的内容至少要有256字节。也就是只有编译产生了至少256字节的数据，才能在执行Response.Flush()以后将信息发到客户端并显示。
以上内容来自http://www.webjx.com/htmldata/2005-10-10/1128898276.html，经本人测试是正确的。以下给出一个示例代码：
<html>
<body>
<%
Call TestFlush ''Flush测试
%>
</body>
</html>
<%
''=================================================
Sub DoSomeThing ''模拟一个后台操作
For i=1 To 10000000
None = i
Next
End Sub
''=================================================
Function LongSpaceStr() ''制造一个长空字符串
LongSpaceStr = ""
For i=1 To 256
LongSpaceStr = LongSpaceStr& " "
Next
End Function
''=================================================
Sub TestFlush ''Flush测试
'用LongSpaceStr加长输出内容，以使Flush生效
Response.Write(LongSpaceStr&"正在执行操作，请等待..."&Now())
Response.Flush()
Call DoSomeThing
Response.Write("<br>操作成功完成！"&Now())
Response.Flush()
End Sub
''=================================================
%>
（２）Response.Flush()调用之前不能出现未闭合的HTML标签（<html> ，<body>除外）
比如，以下代码经测试是不行的：
<html>
<body>
<table ID="MyTable"><tr><td>
<%
Call TestFlush ''Flush测试
%>
</td></tr></table>
</body>
</html>
<%
''......略去与上例中同样的代码......
%>
以下代码经测试是可行的：
<html>
<body>
<table ID="MyTable"><tr><td></td></tr></table>
<%
Call TestFlush ''Flush测试
%>
</body>
</html>
<%
''......略去与上例中同样的代码......
%>
以下代码经测试也是可行的：
<html>
<body>
<%
Call TestFlush ''Flush测试
%>
<table ID="MyTable"><tr><td></td></tr></table>
</body>
</html>
<%
''......略去与上例中同样的代码......
%>
for i=1 to 256
yongfa365=yongfa365&"<!--这里主要是让前边先产生２５６个字符，这样才可以实时输出-->"
if len(yongfa365)>=256 then exit for
next
MadeBasic()
MadeModel()
MadeIndexBlogItem()
response.Write "１/６所有模版生成完成<br>"&yongfa365
Response.Flush()
MadeIndex("Calendar")
response.Write "２/６日期索引生成完成<br>"
Response.Flush()
MadeIndex("Category")
response.Write "３/６分类索引生成完成<br>"
Response.Flush()
MadeIndex("Blog")
response.Write "４/６总索引生成完成<br>"
Response.Flush()
MadeRSS()
response.Write "５/６RSS生成完成<br>"
Response.Flush()
MadeItem("all")
response.Write "６/６所有文章生成完成<font color=red>OK,终于完成了</red>"
Response.Flush()
以上为柳永法(yongfa365)后台动态生成静态文件一段代码，目的是让自己可以看到程序执行到哪了，以前没加Response.Flush()就只看那IE状态栏里的进度条，感觉好郁闷，加上Response.Flush()后，感觉就一个字“爽”，下边是从网上找的一些参考资料汇集：
不知道大家对Buffer了解多少，很多人对这个概念都比较模糊，尤其是在asp中。很多初学者在编写asp程序时很少用到这条语句，下面我就来说说Buffer的用途以及它在asp程序中的作用。
一、Buffer
Buffer从英文直译过来的意思是“缓冲区”，这里我们将它称为缓冲，因为它不仅是个名词，还是个动词。
缓冲区是存储一系列的数据的地方，客户端所获得的数据可以从程序的执行结果直接输出，也可以从缓冲区输出。但是这两种方式在速度上是有差异的：在web中，当一个asp程序被请求的次数不多时，二者基本上没有什么差异，至少我们感觉不出来。但是当有很多人请求一个asp程序时，速度可就不一样了。如果没有缓冲区，那么每个请求asp程序的人的客户端所得到的结果都是asp程序执行一次所得到的结果，而如果预先将asp程序缓冲，那么每个客户端所得到的结果就是缓冲区的结果，不是执行一次程序的结果。比如有1000个用户同时访问一个asp页面，如果这个asp程序没有缓冲，那么程序将被执行一千次，这样服务器的负荷就回加大，从而导致客户端打开页面速度变慢；如果这个asp程序被缓冲了，那么结果就不一样了，每个客户端直接从缓冲区获得数据，服务器将不会因为访问增加而增加程序执行次数，因此客户端打开页面的速度也就比上一种情况要快。这就是Buffer的好处。
二、如何将asp程序缓冲
这个问题其实很简单，只要在asp程序的第一行加上：
<% Response.Buffer = True %>
就可以了。
这句话的意思就是指明输出页面是否被缓冲，当属性值为True时，服务器将不会向客户端发送任何信息，直到所有程序执行完或者遇到
<% Response.Flush %>或<% Response.End %>
语句，才会释放缓冲区的信息。
利用 Response.Buffer=True，Response.Flush 可以增进浏览速度，如果一个页面 Response.Buffer=False，有30个资料转输，若有 100 人浏览此页面，则有 3000 个来回传输，严重影响效率；若在起始得设定 Response.Buffer=True，再将整个页面分为几个群组，在适当的地方搭配 Response.Flush，则可大幅改善浏览者的体验。
三、为什么有时会感觉没有用
比如：
<%
'警告：没事别运行这个
for i=1 to 10000
Response.Write "<b><center><font color=""#FF0000"">我是www.yongfa365.com"&i& "呀</font></center></b>"
Response.Flush
response.Clear
next
%>
半天才会出来，而且出来的是一堆，然后才一个一个的接着出来。
原因：
Response.Flush()。他会将缓冲区中编译完成的数据先发送到客户端
但是
flush的内容至少要有256字节。也就是只有编译产生了至少256字节的数据，才能在执行Response.Flush()以后将信息发到客户端并显示。
Clear 方法
Clear 方法删除缓冲区中的所有 HTML 输出。Clear 方法只删除响应正文而不删除响应标题
语法
Response.Clear
注释
调用 Response.Clear 将清楚本页面前面部分所输出的数据，同时，如果程序设定了 Response.ContentEncoding，Response.Clear 将同时将编码方式设定为直接传送。
应用于Response 对象
四、总结
Response的Buffer属性虽然能够提高页面显示速度，但是也要分什么情况。如果你正在制作一个普通的个人主页，访问量不是很高，并且没有什么复杂的执行程序，那么用不用这个属性就不是很重要，因为将数据缓冲也需要一段时间，只不过我们感觉不到罢了；但是如果你正在制作一个大型论坛或者一个产品展示或其他的商务站点，并且访问量很高，那么我建议在程序的第一行加入<% Response.Buffer = True %>这句话，因为这样能够让客户在有效的时间内获得更多的数据。
附：
一般验证码里文件头里有这个
Response.Buffer=false
Response.Expires=0
Response.ExpiresAbsolute = Now() - 1
Response.AddHeader "Pragma","No-Cache"
Response.AddHeader "Cache-Control","Private"
Response.CacheControl = "No-Cache"
就是为了不让其有缓存。
<html>
<body>
<% Response.Buffer = True %>
<%
Call TestFlush ''Flush测试
%>
</body>
</html>
<%
''=================================================
Sub DoSomeThing ''模拟一个后台操作
For i=1 To 10000000
None = i
Next
End Sub
''=================================================
Function LongSpaceStr() ''制造一个长空字符串
LongSpaceStr = ""
For i=1 To 256
LongSpaceStr = LongSpaceStr& " "
Next
End Function
''=================================================
Sub TestFlush ''Flush测试
'用LongSpaceStr加长输出内容，以使Flush生效
Response.Write(LongSpaceStr&"正在执行操作，请等待..."&Now())
Response.Flush()
Call DoSomeThing
Response.Write("<br>操作成功完成！"&Now())
Response.Flush()
End Sub
''=================================================
%>
了解更多请访问：http://www.ndfweb.cn/news-407.html
鲁公网安备 37110202000336号