steam text to file download

Fantastic, still unsure why mine didn't work - but hey, if it works, it
works - who am I to question...

Many thanks
:-)

As this is not by way of a stream, per say, but this is working on my Server 2003 in IE, Firefox (PC and Mac) and Safari. The If for user agent is due to some limitations for the "Content-Disposition" statement and IE user-agents. Never did actually find out why, but it works:

' I build an array while looping through my record set
' then I build a body to actually export to the user
for i=0 to Ubound(arrReturnedRecs,2)
for j=0 to Ubound(arrReturnedRecs,1)
If arrReturnedRecs(j,i) <> "" then
strBody = strBody & Chr(34) & uCase(arrReturnedRecs(j, i)) & Chr(34) & ","
Else
strBody = strBody & Chr(34) & "N/A" & Chr(34) & ","
End if
next
strBody = strBody & vbcrlf
next

' the strHeader is my column names, previously built
strOutPut = strHeader & strBody

Response.Clear
Response.ContentType = "text/csv.ms-excel"

userAgent = request.serverVariables("HTTP_USER_AGENT")
If InStr(userAgent, "MSIE") then
Response.AddHeader "Content-Disposition", "filename=" & Chr(34) & "YourFileName.csv;" & Chr(34)
Else
Response.AddHeader "Content-Disposition", "filename=YourFileName.csv;"
End if

Response.Write(strOutPut)
Response.End()

' delete obj's, clear var's, etc.