Enisey21
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Только вот мой скрипт отправки почты работает как-то криво.
Письма, которые вроде как уходят, могут придти через 2 минуты (что собственно нормально), а могут и через час. Щелкал, щелкал по скрипту, а ничего не приходит. Я нащелкал до остервенения и ушел на обед. Прихожу и вижу 125 писем.
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "Mihail.Krylov@enisey.msk.ru"
objEmail.To = "it@enisey.msk.ru"
objEmail.Subject = "test"
objEmail.Textbody = "тест34343443434"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "111.111.111.21"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update
objEmail.Send
Последнее время все нормально.
Вопрос по телнету остается актуальным!
Спасибо тому, кто поможет |
