powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите обавить компоненты, чтобы скрипт заработал.
24 сообщений из 24, страница 1 из 1
Помогите обавить компоненты, чтобы скрипт заработал.
    #36494289
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Создал MailTest.vbs:

Dim iMsg
Set iMsg = CreateObject("CDO.Message")
With iMsg
.To = "test@test.com"
.Subject = "MS SQL Server 2000"
.HTMLBody = "Message Body"
End With

Не приходит сообщение на адрес test@test.com с тестового сервера.
Вопрос, что не настроено непосредственно на виндовом сервере.
Может надо где-то подключить CDO и MIME.
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36494326
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не приходит потому что не отправляется. .Send хде?

Jah loves you.
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36494528
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вообще, этот скрипт я нашел в инете на SQL.RU заявлено, как рабочий, но не работает.
Исполняю, ошибок не возвращает.
Или что-то неправильно написано, что-то забыл ...
Надо, чтобы месадж отсылался, а не приходит ...
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36494572
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
   .Send
End With
Jah loves you.
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36494865
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Не получилось ...

Dim iMsg
Set iMsg = CreateObject("CDO.Message")
With iMsg
.To = "martynov@russlavbank.com"
.Subject = "MS SQL Server 2000"
.HTMLBody = "Message Body"
.Send
End With

Ругнулся:
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36494878
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Не получилось ...

Dim iMsg
Set iMsg = CreateObject("CDO.Message")
With iMsg
.To = "test@test.com"
.Subject = "MS SQL Server 2000"
.HTMLBody = "Message Body"
.Send
End With

Ругнулся:
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36494887
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
придётся вам сначала почитать про CDO, а не копипастить чужой пример кода
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36494896
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Служба smtp на компьютере установлена? Работает?

Jah loves you.
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495015
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Что значит служба SMTP, я именно про это и спрашиваю.
Надо какой сервис поднять на сервере или что ...
Аутлук настроен на SMTP и РОР аккаунт ...
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495118
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Служба = сервис.
Да, нужно поднять SMTP-сервис.
Аутлук вообще ни при чем, как и его настройки.

Jah loves you.
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495164
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
есть какой стандартный или необходимо сторонний ставить?
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495174
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в составе IIS
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495221
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
поставил, не помогло ... всё тоже ...
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495232
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
так если поставил, то настрой его
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495237
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Включи релей на адрес 127.0.0.1
Проверь, запущена ли служба. По умолчанию она может быть выключена.

Jah loves you.
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495333
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всё так и есть, не работает ...
Возвращает ту же ошибку ...
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495345
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
у вас домен? почтовый сервак внутри домена есть? если есть, то попробуйте послать почтовое сообщение на известный локальный адрес
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495398
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
у меня на этом сервере настроен Аутлук, оно работает ...
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495410
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
аутлук настроен скорее всего на внешний smtp, поэтому и работает.
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495414
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
глядите весёлые картинки
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495425
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36495433
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
и вот это посмотрите, думаю вам будет полезно. т.к. скорее всего вы даже джокументацию по CDO не читали
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36496210
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Konst_One,
Спасибо за ссылку, заработало вот таким образом:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Dim oMyMail
Set oMyMail = CreateObject("CDO.Message")
omyMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp"
oMyMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "Login"
oMyMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "Password"
oMyMail.Configuration.Fields.Update
oMyMail.To = "Mail@to.ru"
oMyMail.From = "Login"
oMyMail.TextBody = "Our letter"
oMyMail.AddAttachment "C:\1.txt"
oMyMail.Send
...
Рейтинг: 0 / 0
Помогите обавить компоненты, чтобы скрипт заработал.
    #36496213
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
missing.fox,

Модератор: не забывайте про тег SRC
...
Рейтинг: 0 / 0
24 сообщений из 24, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите обавить компоненты, чтобы скрипт заработал.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]