|
<%@ Page Language="VB" %>
<script runat="server">
sub Page_Load(obj as object, e as eventargs)
dim i as integer
Response.Write("Before flush<br>")
Response.Flush()
for i = 0 to 50
next
Response.Write("After flush, before clear<br>")
Response.Clear()
for i = 0 to 50
next
Response.Write("After clear, before end<br>")
Response.End
for i = 0 to 50
next
Response.Write("After end<br>")
end sub
</script>
<html><body>
</body></html>
|