powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Почта, почта...
13 сообщений из 13, страница 1 из 1
Почта, почта...
    #32501168
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подскажите, плз, как прописать, чтобы не выскакивало сообщение:
Код: plaintext
1.
Программа пытается автоматически отправить сообщение от вашего имени...

А отправка сразу осуществлялась?
Я пишу:
DoCmd.SendObject acSendNoObject, , , Fio, , "Вася@мыло.ru", "Приглашение!!!", "Вы получили права на просмотр этого файла." & vbCrLf & "Если необходимо с ним работать в режиме ожидания - свяжитесь со мной." & vbCrLf & vbCrLf & "Вася1@мыло.ru", False
Спасибо...
Stepler (щёлк-щёлк!!)
...
Рейтинг: 0 / 0
Почта, почта...
    #32501180
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
это у тебе офис ИКСПИ стоит.

через DoCmd.SendObject - никак

с1 - поставить аутлук 2003
(гипотеза - может в SP2 поправили - не знаю - для мене аутлук тута под страхом если не смертой казни, то уж увольнения наверняка)
...
Рейтинг: 0 / 0
Почта, почта...
    #32501217
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я пробовал и так...
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Dim strBody As String
Set oul = GetObject( "", " Outlook.Application ")
Set mli = oul.CreateItem(olMailItem)
mli.To = Fio
mli.Copy = " Вася@мыло.ru "
mli.Subject = " Приглашение!!! "
strBody = " Открывайте и работайте. " & vbCrLf & " При необходимости - обращай тесь к..." & vbCrLf & vbCrLf
Set oul = Nothing
mli.send
Set mli = Nothing
 

Но результат тот же....
Stepler (щёлк-щёлк!!)
...
Рейтинг: 0 / 0
Почта, почта...
    #32501247
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
по тому, как мармелад в этом месте льется - первый способ от второго неотличим - можно было и не пробовать.
...
Рейтинг: 0 / 0
Почта, почта...
    #32501261
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Глюк 2002 у меня и естественно НИЧАГО с ним делать НЕЗЯ!!!
Stepler (щёлк-щёлк!!)
...
Рейтинг: 0 / 0
Почта, почта...
    #32501276
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
В любом случае надо искать настройку в Аутлуке.
...
Рейтинг: 0 / 0
Почта, почта...
    #32501278
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это ребята давняя история:\r
/topic/80900&hl=Outlook\r
\r
Защита стоит на уровне модели объектов, поэтому выскакивает на любое программное через COM и через MAPI тоже, помимо этого программеры микрософта даже предусмотрели вариант с SendKey. Обо всем этом можно почитать в MSDN если сделать поиск по Outlook security.\r
\r
Применительно к ссылке могу добавить: Оказывается описанный мною вариант работает не всегда. Вернее в последнем office и его прикрыли (а последний SP под Xp Office вроде также эту гадость делает), эти данные сообщил один чел, который ходил на конфу от Микрософта для разработчиков, где представители микрософта озвучали свою позицию, что они мол борятся со спамерами и не хотят чтобы их программу можно было исползовать для этих целей.\r
\r
На моем по крайне мере OutlookXP с двумя SP данный бюлетень заработал.
...
Рейтинг: 0 / 0
Почта, почта...
    #32501300
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
неправда, через мапи не выскакивает - поиск по слову \r
\r
смотри\r
/topic/70554&hl=
...
Рейтинг: 0 / 0
Почта, почта...
    #32501303
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо за инфу про сервис пак - я не зря его подозревал.
...
Рейтинг: 0 / 0
Почта, почта...
    #32501340
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Хмм, они там про какой-то Extended MAPI пишут, который микрософт не догадался заблокировать, а поддержку в Outlook'е установил, прикольно...
...
Рейтинг: 0 / 0
Почта, почта...
    #32501899
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всё излазил на
Код: plaintext
http://www.dimastr.com/

но я Engl ещё только учу и ничего там не понял...
Может скините примерчик....
А ещё такой вопрос: Если все-таки у меня перестанет выдавать предупреждение, на компе юзера может это повторяться?
ЗЫ. Спасибо (большое наше народное) за возможность приклеплять файлы - иногда это так необходимо...
Stepler (щёлк-щёлк!!)
...
Рейтинг: 0 / 0
Почта, почта...
    #32502185
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В смысле?

ты же настраиваешь свой Outlook, а че там будет у других пользователей, это токо от их настроек зависит

Ты этот бюлетень то пробовал, у тебя пошло?

P.S. Вау, наконец-то файл можно прикладывать, а я то сразу не заметил
...
Рейтинг: 0 / 0
Почта, почта...
    #32502224
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
бюлетень вставил, а толку - чтобы разобраться на англ.- времени нада...
Потом мне необходимо, чтобы у юзеров тоже почта шла (но уже ко мне).
Решил, чтобы отсылалась не автоматом, а с открытием:
Код: plaintext
DoCmd.SendObject acSendNoObject, , , Fio, , "Вася@мыло.ru", "Приглашение!!!", "Вы получили права на просмотр этого файла." & vbCrLf & "Если необходимо с ним работать в режиме ожидания - свяжитесь со мной." & vbCrLf & vbCrLf & "Вася1@мыло.ru" 

Но теперь другая проблемма - у меня далее закрытие базы:
Код: plaintext
1.
2.
Lb:
Application.Quit
 End If......

И в случае, если отказаться от отсылки сообщения - база виснет....
Подскажи, плз, что не так, что делать
Stepler (щёлк-щёлк!!)
...
Рейтинг: 0 / 0
13 сообщений из 13, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Почта, почта...
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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