Cuestión : MS Outlook - email de la cuenta

Hola Experts

Is allí una manera de contar el número de email una caja específica en nuestro cokpnay recibe el diario. Hay una manera de conseguir una cierta clase de informe o una cierta manera de funcionar con un comando que agregue el número de emais. Quizá incluso consiguiendo este informe o cuenta enviada por correo electrónico a otro usuario daily. class= del

Respuesta : MS Outlook - email de la cuenta

Aquí está el código para contar encima de los artículos.  Seguir estas instrucciones de agregarlo a la perspectiva.

Perspectiva 2003

1.  Comenzar la perspectiva
2.  Chascar las herramientas > la macro > el redactor de Visual Basic
3.  Si no ampliado ya, ampliar los objetos de la perspectiva de Microsoft Office y chascar encendido ThisOutlookSession
4.  Copiar el código de la caja del recorte de código y pegarlo en el cristal derecho de
5.  Ventana del redactor de VB de la perspectiva
6.  Corregir el código según lo necesitado.  Incluí líneas de comentario dondequiera que que algo necesita o que puede cambiar
7.  Chascar el icono del diskette en la barra de herramientas para ahorrar los cambios
8.  Cerrar el redactor de VB
9.  Chascar las herramientas > la macro > la seguridad
10. Fijar el nivel de seguridad al medio
11. Cerrar la perspectiva
12. Comenzar la perspectiva
13. La perspectiva exhibirá una advertencia de la diálogo-caja que ThisOutlookSession contiene macros y preguntar si usted quiere permitir que funcionen.  Decir sí.

Perspectiva 2007

1.  Comenzar la perspectiva
2.  Chascar las herramientas > la macro > el redactor de Visual Basic
3.  Si no ampliado ya, ampliar los objetos de la perspectiva de Microsoft Office y chascar encendido ThisOutlookSession
4.  Copiar el código de la caja del recorte de código y pegarlo en el cristal derecho de la ventana del redactor de VB de la perspectiva
5.  Corregir el código según lo necesitado.  Incluí líneas de comentario dondequiera que que algo necesita o que puede cambiar
6.  Chascar el icono del diskette en la barra de herramientas para ahorrar los cambios
7.  Cerrar el redactor de VB
8.  Chascar las herramientas > el centro de la confianza
9.  Chascar la seguridad macra
10. Fijar la seguridad macra a las “advertencias para todas las macros”
11. Chascar la AUTORIZACIÓN
12. Cerrar la perspectiva
13. Comenzar la perspectiva.  La perspectiva exhibirá una advertencia de la diálogo-caja que ThisOutlookSession contiene macros y preguntar si usted quiere permitir que funcionen.  Decir sí.

Una vez que usted tiene el código en el lugar y sabemos que está contando los artículos, después fijaré el código para recuperar la cuenta.
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 dévil de WithEvents como Outlook.Items

Application_Quit secundario privado ()
    Fijar el olkInbox = nada
Terminar el submarino

Application_Startup secundario privado ()
    Fijar el olkInbox = Session.GetDefaultFolder (olFolderInbox). Artículos
Submarino del extremo

olkInbox_ItemAdd secundario privado (artículo de ByVal como objeto)
    Si Item.Class = olMail después
        Add2Count
    Terminar si
Terminar el submarino

Sub Add2Count ()
    “Corregir la trayectoria en la línea siguiente”
    Const FILE_PATH = “c:\Users\David\Documents\”
    objFSO dévil como objeto, objFile como objeto, lngCounter como de largo, strDate como secuencia
    lngCounter = 0
    strDate = formato (fecha, “yyyy-milímetro-DD”)
    Fijar el objFSO = CreateObject (“Scripting.FileSystemobject”)
    Si objFSO.FileExists (FILE_PATH y strDate y “.txt”) entonces
        objFile determinado = objFSO.OpenTextFile (FILE_PATH y strDate y “.txt”, ForReading)
        lngCounter = objFile.ReadAll
    
        objFile determinado = objFSO.CreateTextFile (FILE_PATH y strDate y “.txt”)
    Terminar si
    objFile.Close
    lngCounter = lngCounter + 1
    objFile determinado = objFSO.CreateTextFile (FILE_PATH y strDate y “.txt”)
    lngCounter de objFile.Write
    objFile.Close
    objFile determinado = nada
    Fijar el objFSO = nada
Terminar el submarino
Otras soluciones  
 
programming4us programming4us