Cuestión : Adición de entradas del calendario de la perspectiva del servidor

¿Me estoy preguntando si hay una manera como crear a un grupo de la distribución y el adición de usuarios, después las citas del calendario de la perspectiva de la creación para el grupo, que van a cada calendario de la perspectiva de los usuarios? ¿el

Alternatively, hay una manera de hacer esto directo del servidor a cada calendario de los usuarios?

From un servidor de 2003/2008 a la perspectiva 2007 clients.

Thanks class= del

Respuesta : Adición de entradas del calendario de la perspectiva del servidor

Esto debe agregar solamente una cita por día.
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:

olAppointmentItem de Const = 1
Const = 9 olFolderCalendar
olkApp dévil, olkSes, olkFld, olkApt
Fijar el olkApp = CreateObject (“Outlook.Application”)
Fijar los olkSes = olkApp.GetNamespace (“MAPI”)
olkSes.Logon olkApp.DefaultProfileName
Fijar el olkFld = olkSes.GetDefaultFolder (olFolderCalendar)
Fijar el olkApt = olkFld.Items.Find (“[tema] = “las cintas de reserva del cambio” y [comienzo] = “” y formato (la fecha y “el 3:00 P.M.”, “el ddddd h: nn AMPM”) y”” ")
Si TypeName (olkApt) = “nada” entonces
    Fijar el olkApt = olkApp.CreateItem (el olAppointmentItem)
    Con el olkApt
        “Cambiar el tema según lo deseado”
        . Tema = “cintas de reserva del cambio”
        “Cambiar la hora de salida según lo deseado”
        . Comienzo = fecha y “3:00 P.M.”
        “Cambiar la duración según lo deseado (en minutos)”
        . Duración = 30
        “Cambiar el tiempo del recordatorio según lo deseado”
        .ReminderMinutesBeforeStart = 10
        .ReminderSet = verdad
        . Ahorrar
    Terminar con
Terminar si
Fijar el olkApt = nada
Fijar el olkFld = nada
olkSes.Logoff
Fijar los olkSes = nada
Fijar el olkApp = nada
Otras soluciones  
 
programming4us programming4us