VBScript profile creation with cached exchange mode

Outlook362
Hi,



i'm trying to create a profile with cached exchange mode with Dimastr DLL

profman.dll



all is ok except the cached mode....



where am i wrong ?







Set Profiles=CreateObject("ProfMan.Profiles")

........

PR_PROFILE_UNRESOLVED_NAME = &H6607001E

PR_PROFILE_UNRESOLVED_SERVER = &H6608001E

PR_PROFILE_CONFIG_FLAGS = &H6632000B

CONFIG_OST_CACHE_PRIVATE = &H00000180

....

Set NewProfile = Profiles.Add(ProfileName, false, false)

...



Set ExchService = NewProfile.Services.Add("MSEMS", "Microsoft Exchange",

false)



Set Properties = CreateObject("ProfMan.PropertyBag")



Properties.Add PR_PROFILE_UNRESOLVED_NAME, myusr

Properties.Add PR_PROFILE_UNRESOLVED_SERVER, "xxxxxxxxxxxx"



'Try to set exchange cached mode :



Properties.Add PR_PROFILE_CONFIG_FLAGS, CONFIG_OST_CACHE_PRIVATE



'



ExchService.Configure 0, , Properties















--





don''t reply to my email, antispam fake email


-