Отправка электронной почты в ASP (сообщение CDO) каждый раз зависает от 5 до 10 секунд

Question

Я отправляю письмо, используя этот код:

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

и пока это выполняется, страница зависает. Это займет от 5 до 10 секунд, прежде чем он движется дальше. Извините, если это тривиально, но мне нужен отдельный механизм очередей, потому что я не делаю этого на других сайтах. Как они это делают?

Answer 1

Письмо отправлено? Вы говорите, что пройдет несколько секунд, прежде чем он пойдет дальше - что вы имеете в виду?

Я посмотрел на некоторые из моих кодов 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