powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос по почте
10 сообщений из 10, страница 1 из 1
Вопрос по почте
    #33085099
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Уже были обсуждения Глюка и Глюка Экспресса....
Но нигде не нашел - как отключить появление окна о "попытке отослать от вашего имени...".
Когда отправляется несколько сообщений в адреса - то мона и вручную, а вот когда многоооооо!
Подскажите, плз, как сделать отсылку без ентого окна-подтверждения
> big-duke , я же знаю, что ты знаешь - помоги !!!

Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?  
...
Рейтинг: 0 / 0
Вопрос по почте
    #33086650
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
4stepler
:( с васика почти слез, залез на .нет, там проблем с почтой пока к счастью нет :)

...
Рейтинг: 0 / 0
Вопрос по почте
    #33087213
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вдруг кому пригодится...
Свою проблу обошел так:
Private Sub Export2Outlook()
'Отправка почты с приклепленным файлом через Глюк-Секретные документы
'Приклепить удается только *.doc
Te = РассылкаForm.Text 'текст рассылки из поля формы
tem = РассылкаForm.тема 'тема рассылки из поля формы
файл = РассылкаForm.fail 'файл рассылки из поля формы
N = 2
l: If N <= 556 Then
Tex = "Добрый день, " & Cells(N, 4) & "!" & Chr(10) & Te 'ячейка - ФИО получателя
adress = Cells(N, 5) 'мыло получателя
Dim Outlook As Outlook.Application
Dim Mail As MailItem, DestFolder As MAPIFolder
Dim FN As String

FN = файл
Set Outlook = New Outlook.Application
Set DestFolder = Outlook.GetNamespace("MAPI").GetDefaultFolder(olFolderDrafts)
Set Mail = CreateItem(olMailItem)
With Mail
.To = adress
.Subject = tem & " для " & Cells(N, 4)
.Attachments.Add FN, olByValue
.Body = Tex
On Error GoTo errors:
.Save 'Send 'Сохраняю в Черновиках, чтобы Глюк не вывешивал предупреждение
End With
errors:
N = N + 1
GoTo l
End If
Set Outlook = Nothing
End Sub

Таким образом вся рассылка (> 500 адрессов !!!) падает в папку Черновики, а потом я всю рассылки перемещаю в папку Исходящие и отправляю....

Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?  
...
Рейтинг: 0 / 0
Вопрос по почте
    #33087376
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
галочка в настройках OutlookExpress:
Options\Security = Warn me when other applications try to send mail as me.
...
Рейтинг: 0 / 0
Вопрос по почте
    #33087567
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Konst_Oneгалочка в настройках OutlookExpress:
Options\Security = Warn me when other applications try to send mail as me.
Ну и хде тама "Предупредите меня когда другие применения пытаются послать почту как я" ???
Я енто в Параметрах->Безопасность не нашел...
...
Рейтинг: 0 / 0
Вопрос по почте
    #33087611
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вот здесь
...
Рейтинг: 0 / 0
Вопрос по почте
    #33087687
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А у мени такое:
Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?  
...
Рейтинг: 0 / 0
Вопрос по почте
    #33088069
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
я не знаю, что это за версия Outlook Express, никогда такой не видел.
...
Рейтинг: 0 / 0
Вопрос по почте
    #33091905
Barsss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если прога должна работать только под одним пользователем то можно изменить значение в реестре ключ:
HKEY_USERS\S-1-5-21-1482476501-412668190-1801674531-1286\Identities\{2FA52940-C555-4753-8954-C054B2929076}\Software\Microsoft\Outlook Express\5.0\Mail\Warn on Mapi Send: 0x00000000
Warn on Mapi Send: 0x00000000 — разрешить отсылку.
Warn on Mapi Send: 0x00000001 — Спрашивать пользователя.
Значение S-1-5-21-1482476501-412668190-1801674531-1286 разное для разных пользователей.
...
Рейтинг: 0 / 0
Вопрос по почте
    #33093155
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
BarsssЕсли прога должна работать только под одним пользователем то можно изменить значение в реестре ключ:
HKEY_USERS\S-1-5-21-1482476501-412668190-1801674531-1286\Identities\{2FA52940-C555-4753-8954-C054B2929076}\Software\Microsoft\Outlook Express\5.0\Mail\Warn on Mapi Send: 0x00000000
Warn on Mapi Send: 0x00000000 — разрешить отсылку.
Warn on Mapi Send: 0x00000001 — Спрашивать пользователя.
Значение S-1-5-21-1482476501-412668190-1801674531-1286 разное для разных пользователей.
Спасибочки большое....
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос по почте
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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