Вопрос : Внешний вид MS - электронная почта отсчета

Hi Experts

Is там дорога подсчитывать число электронная почта специфически почтовый ящик в наше cokpnay получает повседневность. Дорога получить некоторый вид рапорта или некоторая дорога бежать командование добавляет число emais. Возможно даже получающ эти рапорт или отсчет посыланными по электронной почте к другому потребителю daily.
class=

Ответ : Внешний вид MS - электронная почта отсчета

Здесь Кодий для подсчитывать вверх по деталям.  Последуйте за этими инструкциями добавить его к внешнему виду.

Внешний вид 2003

1.  Начните внешний вид
2.  Щелкните инструментами > макросом > редактором Висуал Басич
3.  Если уже расширено, расширьте предметы внешнего вида офиса Майкрософт и щелкните дальше ThisOutlookSession
4.  Скопируйте Кодего от коробки фрагмента Кодего и наклеите его в right-hand форточку
5.  Окно редактора VB внешнего вида
6.  Редактируйте Кодего как нужно.  Я включил линии комментария где бы ни, котор что-то или может изменить
7.  Щелкните иконой дискета на панели инструментов для того чтобы сохранить изменения
8.  Закройте редактора VB
9.  Щелкните инструментами > макросом > обеспеченностью
10. Установите уровень обеспеченностью к средству
11. Закройте внешний вид
12. Начните внешний вид
13. Внешний вид покажет предупреждение диалог-коробки что ThisOutlookSession содержит макросы и спрашивать если вы хотите позволить их побежать.  Скажите да.

Внешний вид 2007

1.  Начните внешний вид
2.  Щелкните инструментами > макросом > редактором Висуал Басич
3.  Если уже расширено, расширьте предметы внешнего вида офиса Майкрософт и щелкните дальше ThisOutlookSession
4.  Скопируйте Кодего от коробки фрагмента Кодего и наклеите его в right-hand форточку окна редактора VB внешнего вида
5.  Редактируйте Кодего как нужно.  Я включил линии комментария где бы ни, котор что-то или может изменить
6.  Щелкните иконой дискета на панели инструментов для того чтобы сохранить изменения
7.  Закройте редактора VB
8.  Щелкните инструментами > центром доверия
9.  Щелкните Macro обеспеченностью
10. Установите Macro обеспеченность к «предупреждениям для всех макросов»
11. Щелкните О'КЕЙОМ
12. Закройте внешний вид
13. Начните внешний вид.  Внешний вид покажет предупреждение диалог-коробки что ThisOutlookSession содержит макросы и спрашивать если вы хотите позволить их побежать.  Скажите да.

Как только вы имеете Кодего в месте и мы знаем оно подсчитывает детали, тогда я вывешу Кодего для восстановлять отсчет.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
Тусклое olkInbox WithEvents как Outlook.Items

Приватное Sub Application_Quit ()
    Установите olkInbox = ничего
Закончите подводную лодку

Приватное Sub Application_Startup ()
    Установите olkInbox = Session.GetDefaultFolder (olFolderInbox). Детали
Подводная лодка конца

Приватное Sub olkInbox_ItemAdd (деталь ByVal как предмет)
    Если Item.Class = olMail после этого
        Add2Count
    Закончитесь если
Закончите подводную лодку

Sub Add2Count ()
    «Редактируйте курс на следующую линию»
    Const FILE_PATH = «c:\Users\David\Documents\»
    Тусклое objFSO как предмет, objFile как предмет, lngCounter как длиной, strDate как шнур
    lngCounter = 0
    strDate = форма (дата, «yyyy-mm-dd»)
    Установите objFSO = CreateObject («Scripting.FileSystemobject»)
    Если objFSO.FileExists (FILE_PATH & strDate & «.txt») после этого
        Установленное objFile = objFSO.OpenTextFile (FILE_PATH & strDate & «.txt», ForReading)
        lngCounter = objFile.ReadAll
    Еще
        Установленное objFile = objFSO.CreateTextFile (FILE_PATH & strDate & «.txt»)
    Закончитесь если
    objFile.Close
    lngCounter = lngCounter + 1
    Установленное objFile = objFSO.CreateTextFile (FILE_PATH & strDate & «.txt»)
    lngCounter objFile.Write
    objFile.Close
    Установленное objFile = ничего
    Установите objFSO = ничего
Закончите подводную лодку
Другие решения  
  •  Как я добавляю кнопки на форме PDF для того чтобы добавить/извлекаю рядки данных?
  •  Шнур ошибки в блоке задвижки?
  •  сколько вариант сервера SQL на одной машине
  •  Внешний вид 2007 не может архивный файл открытой сети сохраненный
  •  Активно директория DNS записывает вопрос
  •  Отчет о доступа 2010 экспорта к CSV с коллекторами?
  •  Прокладчик OCE 9400 не начинает
  •  как добавить десятичное место в формуле в отчете о кристалла seagate
  •  Windows XP и Мичрософт Оутлоок и проблемы установителя Windows
  •  VB6 к VS2010 - консультации тренировки?
  •  
    programming4us programming4us