Continue script before function completes

Is it possible to have a script call a function or sub and continue before that function or sub finishs it's task? Here's the problem I'm having and what I'm trying to solve. My hosts SMTP server is being horribly slow, on the order of 10-15 seconds to send a simple email. As you can guess with the forum if it has to send 10 notices on a post it can take as much as 2 minutes for the post_message.asp script to complete.

Is there any way to call the email function, or wrap the email notification section in a function or sub, to queue up the emails and finish the post_message.asp script before the mails are all sent?

I'm not sure if it's even possible to execute ASP/vb script in a non linear fashion like that.

Thanks for any suggestions (other than changing mail servers, I know that works but isn't a viable option right now).

John

It's a problem with their mail server that they don't want to admit too, it didn't used to be that way. There isn't really a large distance between the web server, hosted on my cable connection, and the ISPs mail server. It used to be much quicker, say 1 second, as you would expect.

I can send mail through my own SMTP server but then I run into overly agressive spam filters that think they know every valid IP address and so on.

I'm thinking the only way to do this, if it's even possible, would be to spawn a seperate thread, which may not be possible or may require a ISAPI control. It would probably be simpler to drive down to the cable company and fix their SMTP problem for them.

Thanks dj air.

It's easy to multithread in .net as I understand, but not ASP.

It turns out you can also do it using XMLHTTP by calling another script. You can use xmlHTTP to do a post or get of another script and not have the initial page wait for a response. While this method works to get it to work with WebWiz would mean some passing all of the sendmail parameters to the new script so it could loop through the people to send email to.

Here is the code to call script2 from script1 and not have script1 wait for script2 to finish it's tasks.

  Response.Buffer = True
  Dim objXMLHTTP, xml
  Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")
     
  xml.Open "GET", "http://localhost/somescript.asp", True
  Call xml.Send()

  On Error Resume Next
 
  'Wait for 1 second to see if we've not gotten the data yet
  If xml.readyState <> 4 then
    xml.waitForResponse 1 ' After 1 second move on with the script
  End If

  Set xml = Nothing