Sending email to ASP (CDO message) takes 5 to 10 seconds each time

Question

I am sending an email using this code:

Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sign-up"
myMail.From="[e-mail]"
myMail.To="[e-mail]"
myMail.HTMLBody = signup
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.1and1.com"
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25 
myMail.Configuration.Fields.Update
myMail.Send
set myMail=nothing

and while this is running, the page freezes. It will take 5 to 10 seconds before moving on. Sorry if this is trivial, but I need a separate queuing mechanism because I do not do this on other sites. How do they do it?

Answer 1

Is the mailing list sent? You say it takes a few seconds before moving on - what do you mean?

asp cdo-, , , CDO.Configuration. , , , :

Function GetConfig()
Dim oConfig
Set oConfig = CreateObject("CDO.Configuration")
oConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
    'etc...
     oConfig.Fields.Update
     Set GetConfig = oConfig
End Function