Буду рад любой идее.
Вот ещё выяснялись дополнительные обстоятельства.
Пробую отправить почту с помощью VBScript.
Вот файлик send_mail_test.vbs, который отправляет почту:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
SendMail WScript.Arguments(0), WScript.Arguments(1), WScript.Arguments(2)
' //Oleav's function. Based on www.w3schools.com source.
Sub SendMail(ToAddress, Subject, FileName)
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = Subject
objMessage.From = "myaddress@mydomain.ru"
objMessage.To = ToAddress
objMessage.HTMLBody = ReadFileContents(FileName) 'Text
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2 'Name or IP of remote SMTP server
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="mail.avtodom.ru" 'Server port
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") =25
objMessage.TextBodyPart.Charset="windows-1251" 'Кодировка. Спасибо: http://www.askit.ru/custom/vba_office/m13/13_08_cdo_vba.htm
objMessage.Configuration.Fields.Update
objMessage.Send
Set objMessage = Nothing
End Sub
const ForReading = 1, ForWriting = 2, ForAppending = 8
function ReadFileContents(FileName)
set FileSys = CreateObject("Scripting.FileSystemObject")
set FileForRead = FileSys.OpenTextFile(FileName, ForReading)
AllText = FileForRead.ReadAll
FileForRead.Close
set FileForRead = Nothing
ReadFileContents = AllText
end function
Вот батник, который запускает этот файл:
1.
C:\Windows\System32\wscript.exe C:\TEMP\send_mail_vbs\send_mail_test.vbs "myaddress@mydomain.ru", "Proverka 2", "mail.txt"
Всё работает прекрасно, если запускать батник из консоли. Отправляет мгновенно и получаю письмо мгновенно!
Но всё меняется, когда я запускаю этот VBScript из php:
1.
2.
3.
4.
5.
6.
<?php
echo 'start...';
file_put_contents('c:\temp\send_mail_vbs\mail.txt', '<p>first line</p><p>second</p><p>third <b>bold</b> line.</p>');
exec('start c:\temp\send_mail_vbs\send_mail_test.vbs "Nikolai.Matushenkov@bmw-avtodom.ru" "head!" "c:\temp\send_mail_vbs\mail.txt"');
echo 'finish!';
?>
Отправка-то происходит мгновенно, но доходит это письмо стабильно за 5 минут. Если отправить повторное письмо, не дождавшись 5 минут, то первое письмо не доставляется, а второе приходит спустя 5 минут.
И почтовый клиент эти 5 минут как-то подозрительно долго проверяет письма. По минуте ожидает ответа при каждом запросе. А как только письмо получил, так и скорость проверки увеличивается, за 1 секунду дальше проверяет наличие писем.
В общем, подскажите, в чём может быть дело? Буду рад любой идее. Может быть причина в каких-то специфических настройках операционной системы на моём компе? Может быть в сети проблема? В почтовом сервере? Куда копать?
