Set objEmail = CreateObject("CDO.Message")
objEmail.From = "netmon@domain.com"
objEmail.To = "services@domain.com"
objEmail.Subject = "Server down"
objEmail.Textbody = "Server1 is no longer accessible over the network."
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _
"domain"
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update
objEmail.Send
[/quote]
скопировал с Microsoft, раньше, не здесь, работал, сейчас, не работает.
Активный пользователь
Сообщения: 117Зарегистрирован: 23 янв 2004, 15:23Откуда: KG
mirage » 23 апр 2007, 07:01
Оставть свои почтовый ящик я вам перешлю немного другой скрипт
"Любой человек, остановившийся в своем развитии, будет заменен другим."
Администратор
Сообщения: 3444Зарегистрирован: 19 дек 2003, 13:36Откуда: Москва
domovoy » 23 апр 2007, 11:09
mirage
А здесь запостить его проблематично?
Правильно заданный вопрос - это уже половина ответа.
Активный пользователь
Сообщения: 117Зарегистрирован: 23 янв 2004, 15:23Откуда: KG
mirage » 23 апр 2007, 12:08
Цитата (domovoy @ 23.04.2007 - 10:09) mirage
А здесь запостить его проблематично?
[/quote]
Да к сожалению, к нему нужен ActiveX, куда выложить его? Российские ФТП отпадают, а если на свои местные (KG) скачать будет проблематично из вне.
Предлагаю скинуть Вам его на почту, а Вы разместите на сайте.
"Любой человек, остановившийся в своем развитии, будет заменен другим."
Активный пользователь
Сообщения: 793Зарегистрирован: 17 мар 2004, 19:11Откуда: Санкт-Петербург, Россия
Remy » 23 апр 2007, 12:30
Друзья, скрипт абсолютно рабочий (должен быть),
так как взят с сайта MS "Hey scripting guys!"
шлю внутри одного домена, то есть релей-то в принципе и не нужен!
Для проверки коннекчусь телнетом по 25 порту и прекрасно отсылаю всю почту на эти адреса.
Активный пользователь
Сообщения: 793Зарегистрирован: 17 мар 2004, 19:11Откуда: Санкт-Петербург, Россия
Remy » 23 апр 2007, 19:56
Все работает
Слал письмо в группу требующую автризации
Администратор
Сообщения: 3444Зарегистрирован: 19 дек 2003, 13:36Откуда: Москва
domovoy » 24 апр 2007, 10:12
И в чем быда загвоздка?
Если уж задал вопрос и оешил проблему то описывай, что бы другие не наступали на эти грабли.
Правильно заданный вопрос - это уже половина ответа.
Активный пользователь
Сообщения: 793Зарегистрирован: 17 мар 2004, 19:11Откуда: Санкт-Петербург, Россия
Remy » 24 апр 2007, 16:15
Цитата (domovoy @ 24.04.2007 - 09:12) И в чем быда загвоздка?
Если уж задал вопрос и оешил проблему то описывай, что бы другие не наступали на эти грабли.
[/quote]
Слал письмо в группу требующую автризации!
Вернуться в Скрипты
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 8
Выберите форум Технический форум Вопросы по сайту и форуму Статьи и материалы сайта В мире IT Переход на лицензионное программное обеспечение Тематические форумы Сетевые операционные системы Почтовые серверы Межсетевые экраны (Firewall) и Прокси серверы (Proxy) Системы управления и мониторинга Терминальные серверы Политики безопасности Железо, Оборудование Сети и сетевые технологии, сетевое оборудование. Серверы баз данных (SQL) Автоматизация процесса управления Скрипты Антивирусное ПО Антивирус от "Лаборатории Касперского" Прикладное ПО Открытое ПО IT Service Management Управление Конфигурациями, Изменениями, Релизами Служба Service Desk Управление Инцидентами и Проблемами ПО автоматизации ITSM Инструкции и документация Организационные документы Техническая документация Мониторинг Резервное копиование, восстановление данных