Re: VBS: Создать контакт в Outlook'е в Общих папках

null@example.com (Rialto) — Thu, 24 Mar 2011 17:12:55 +0000

Нашёл и сделал сам.

Set objOutl = WScript.CreateObject("Outlook.Application")

Set oNameSpace = objOutl.GetNamespace("MAPI")
Set PublicContactFolder = oNameSpace.GetDefaultFolder(18).Folders("контакты")

Set objContact = objOutl.CreateItem(2)

objContact.FirstName = "john"
objContact.LastName = "smith"
objContact.Email1Address = "john@world.com"
objContact.Move PublicContactFolder

objContact.Save()

Посмотреть методы и свойства Item.Contact можно тут:
http://msdn.microsoft.com/en-us/library … 12%29.aspx

а посмотреть значения для переменных типа olFolderContacts можно тут:
http://msdn.microsoft.com/en-us/library … 12%29.aspx

VBS: Создать контакт в Outlook'е в Общих папках

null@example.com (Rialto) — Thu, 24 Mar 2011 16:33:14 +0000

Собственно подскажите как создать объект "контакт" с оутлуке в общих папках (exchange server)

Есть общая папка \\Общие папки\Все общие папки\контакты, как там создать контакт ?
Знаю что в обычной папке "контакты" создать можно так:

Set objOutl = WScript.CreateObject("Outlook.Application")
Set objContact = objOutl.CreateItem(2)
objContact.FirstName = "john"
objContact.LastName = "smith"
objContact.Email1Address = "john@world.com"
objContact.Save()

Серый форум — VBS: Создать контакт в Outlook'е в Общих папках

Re: VBS: Создать контакт в Outlook'е в Общих папках

VBS: Создать контакт в Outlook'е в Общих папках