VB Forum / Database Access / January 2008

Find out what the little blocks are. My guess is they are line-feeds, or LF/CR, instead of CR/LF. Replace them.

-ralph

 I you all! Thanks for reading!!!
 I'm trying to download a text file through the download dialog box using Ado stream:

   set adoStream = Server.CreateObject("ADODB.Stream")
   adoStream.Open()
   adoStream.CharSet = "x-ansi"
   adoStream.Type = 2 ' adTypeText
   adoStream.WriteText( file_body )
   adoStream.Position = 0
   adoStream.Type = 1 'adTypeBinary

   Response.Clear
   Response.AddHeader "Content-Length", len(file_body)
   Response.AddHeader "Content-Transfer-Encoding", "binary"
   Response.AddHeader "Content-Disposition", "attachment; filename="& file_name &"; "
   Response.ContentType = "application/unknown"
   Response.BinaryWrite( adoStream.Read() )
   adoStream.Close
   Response.End

 This is the look of the original string, with carriage returns and line feeds properly displayed

 But when I open the downloaded file, it looks like this:

 How can I recover the original formating of the file_body string in the saved file
 Also I tried to use the ReadText method, but it puts a space between each character (???)

 How can I solve this
 Any clues highly appreciated
 Allison J