asp to asp.net + binary stream => performace issues

[David Purton]

Hi,

I have some ASP code to stream a binary file. It works well and looks
something like the original ASP code shown below.

I'm experimenting in creating ZIP files on the fly and am trying to come
up with good ways of streaming binary files using ASP.NET, but I'm
having performance issue. The new ASP.NET code is also shown below. The
performance of this is *terrible*. I get less than 200 KB/s across a
LAN. The original code gives a speed the same as just serving a file of
the hard disk directly.

Can anyone give my some pointers to the correct way to do this sort of
thing?

I have experimented using different buffer sizes or writing out the
whole file in one go with no buffer loop, but it does not seem to make a
difference.

I've only just started to experiment with ASP.NET, so I could be trying
to do this completely the wrong way...

The files are about 10MB in size if that matters.

cheers

dc

ORIGINAL ASP CODE:

<%
Function StreamBinaryFil e(FileName)
Const adTypeBinary = 1
Dim BinaryStream
Set BinaryStream = CreateObject("A DODB.Stream")
BinaryStream.Ty pe = adTypeBinary
BinaryStream.Op en
BinaryStream.Lo adFromFile FileName
Do While Not BinaryStream.EO S
Response.Binary Write BinaryStream.Re ad (1048576)
Response.Flush
Loop
Set BinaryStream = Nothing
End Function

Function SaveBinaryFile( FileName, ContentType)
Response.Buffer = True
Response.Clear
Response.AddHea der "Content-Disposition", _
"attachment ; filename=" & FileName
set fso = Server.CreateOb ject ("Scripting.Fil eSystemObject")
set file = fso.GetFile (Server.MapPath (FileName))
Response.AddHea der "Content-Length", file.Size
Set file = Nothing
Set fso = Nothing
Response.Conten tType = ContentType
StreamBinaryFil e Server.MapPath (FileName)
Response.End
End Function
%>

NEW ASP.NET CODE:

<script language=C# runat=server>
void StreamBinaryFil e (string FileName) {
FileStream BinaryStream = File.OpenRead (FileName);
byte[] buf = new byte[1048576];
while (BinaryStream.R ead (buf, 0, 1048576) > 0) {
Response.Binary Write (buf);
Response.Flush ();
}
BinaryStream.Cl ose ();
}

void SaveBinaryFile (string FileName, string ContentType) {
FileInfo f = new FileInfo (Server.MapPath (FileName));
Response.Buffer Output = true;
Response.Clear ();
Response.AddHea der ("Content-Disposition",
"attachment ; filename=" + FileName);
Response.AddHea der ("Content-Length", f.Length.ToStri ng ());
Response.Conten tType = ContentType;
StreamBinaryFil e (f.FullName);
Response.End ();
}
</script>