Response.redirect - The HTTP headers are already written to the client browser

Have a script which sends muiltiple emails to a number of email addresses in a loop depending on the number of clients.  

Sometimes this can be 1000 or more and would time out.  

Once complete at the end of the page I do a response.redirect to a page to show it is completed.

I was recommended to add the following to prevent the time out.

At the top of page:
Response.Buffer = True

At the last line of the loop

But after doing this my response.redirect no longer works giving the error:

Response object error 'ASP 0156 : 80004005'

Header Error

/send/sendmessage/index.asp, line 125

The HTTP headers are already written to the client browser. Any HTTP header modifications must be made before writing page content.

How can I fix this?
Never really used the .buffer or .flush before.
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

You can not redirect after having send output to the browser.

Simplest solution is not to do Response.Redirect but to write a javascript redirect

<script>document.location = 'nextpage.htm';</script>

Forget using the response.buffer & response.flush...

simply put

Server.ScriptTimeout = 1200

at the top of the script... the script will not timeout for 20 min...
Well, my guess is that the code shows progress to the user. But if that is not the case, then why do a Response.Flush at all.

Sending 1000 mails can be (too) hard for the mailserver to handle. In similar functionality I made the script wait a few seconds after 50 mails had been sent.
Introduction to R

R is considered the predominant language for data scientist and statisticians. Learn how to use R for your own data science projects.

harris9999Author Commented:
No progress is shown to the user, so I assume then that the response.flush is of no use?
Sybe is right.  You cannot redirect when there is already data sent to the Response Buffer (via Response.Flush) even though it may be empty.  You will have to do away with Response.Flush (and Response.Buffer) and just use Response.Redirect.

On the other hand, if it would take some time for the page to be processed in sending emails, displaying progress status (using Response output and Response.Flush) would be a great idea.  As sybe said, at the end of your page, Response.write a client-side script so the browser (not the server) will handle the redirect.
harris9999Author Commented:
Ok.  So if I was to display progress how is that best done?

just do a response.write whatever I want, then does the response.flush clear that and repeated over again through the loop?
Try including this on your ASP page.  Just change the layout, loop and insert your email code:

<!-- Set-up Page -->
<CENTER>Sending Emails...</CENTER><BR>
<CENTER><DIV ID="msg1">Generating List...</DIV></CENTER><BR>

  // Assuming Rset is the recordset for your list of recipients
  var c_name;

  while (!Rset.EOF) {
    c_name = Rset("name");
    // ... code to email to recipient

    // Update page to show current name on msg1
    %>document.all("msg1").innerText = unescape("<%= escape(c_name) %>");<%

<!-- Go to next page (as taken from sybe) -->
<SCRIPT>document.location = 'nextpage.html';</SCRIPT>

Open in new window


Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
While the above code display's the names, something similar can be done using a progress bar instead.

Hope this helps.
Abiel de GrootDeveloperCommented:
I too ran into a simular problem when sending large numbers of Emails. I use Persits Mail but the idea would work with most other mail scripts.

Send the email directly to the smtp servers "Queue folder" rather than sending one by one.

If you choose to send one by one the process is as follows.

1. Negotiate authorisation with the smtp server
2. If accepted, the smtp server attempts top send the mail
3. smtp server send results (Success or not)
4. connection closed
5. Do it all over again for each individual mail message.... 1000 times +

This is very time consuming and server heavy.


Open the connection to the smtp server and loop all the 1000 + emails using "Mail.Queue = True"
This simply send all to the queue folder close and go home.

The smtp server by default sends queue content in batches of 50 at a time and there is no negotiation after the initial entery.

Doing it this way I can send many 1000's of emails to registered clients, within a few seconds.

My sample code below.

Hope this helps.

If IsArray(ArrEmailRecipients) Then
For Fu = 0 To Ubound(ArrEmailRecipients,2)
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Charset = "UTF-8"
Mail.ContentTransferEncoding = "quoted-printable"
Mail.Username = E_Email_UN
Mail.Password = E_Email_PW
Mail.Queue = True
Mail.Host = E_SMTP_Server
Mail.From = E_Email_SystemAddress
Mail.FromName = strCompanyName

Mail.AddAddress   ArrEmailRecipients(3,Fu)
Mail.Subject = Mail.EncodeHeader(strCompanyName & " - " & strEmailTitle, "UTF-8")
Mail.Body = strBody
Mail.IsHTML = True

On Error Resume Next
      If Err <> 0 Then
        Response.Write "An error occurred: " & Err.Description
      End If
On Error GoTo 0

Set Mail = Nothing
End If

It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today

From novice to tech pro — start learning today.