Страница 1 из 1

MS Outlook и напоминалка о "subject"

Добавлено: 13.05.2010, 15:39
Генннадий
Когда-то очень давно, когда я ещё пользовался Outlook Express-ом, меня раздражало напоминание перед отправкой о том, что я не указал тему послания.
Теперь вот ищу такую же напоминалку, но для MS Outlook. В самой программе, похоже, такого нет (или не нашёл). Может есть какой-то другой способ? Что-то типа плагина, что ли. :?:

Re: MS Outlook и напоминалка о "subject"

Добавлено: 13.05.2010, 17:07
puf
хотел стереть :)

Re: MS Outlook и напоминалка о "subject"

Добавлено: 13.05.2010, 17:13
Генннадий
puf писал(а):Усё.
:shock:
Может, я неясно сформулировал. :unknown: Попробую ещё раз.
Нужно напоминание перед отправкой письма, о том, что в строчке Subject (Тема) ничего не указано.

Re: MS Outlook и напоминалка о "subject"

Добавлено: 13.05.2010, 19:48
zar013
Генннадий,
Достаточно просто (работает для 2003 и 2007, может и для 2010):
1. В Outlook жмёшь Alt+F11
2. Получаешь такую штуку:
Изображение
3. Дабл-клик на ThisOutLookSession
4. Вставляешь в появившееся окно следующий скрипт:

Код: Выделить всё

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
   Dim strSubject As String
   strSubject = Item.Subject
   If Len(Trim(strSubject)) = 0 Then
       Prompt$ = "Subject is Empty. Are you sure you want to send the Mail?"
      If MsgBox(Prompt$, vbYesNo + vbQuestion + _
 vbMsgBoxSetForeground, "Check for Subject") = vbNo Then
        Cancel = True
      End If
  End If
End Sub
5. Нажимаешь сейв и закрываешь окно.
6. В меню выбираешь Tools->Macro->Security, отмечаешь опцию Warning for all macro и жмёшь ОК. Всё.
Изображение

Re: MS Outlook и напоминалка о "subject"

Добавлено: 13.05.2010, 20:03
Генннадий
zar013 писал(а):Достаточно просто
Да, для тех, кто в курсе. :)
zar013, большое спасибо! Только что попробовал-всё работает.
+3 за то, что всегда в курсе!