|
Complete Code without error detection in VB:
Const olFolderInbox = 6
Set objOutlook = CreateObject("Outlook.Application")
Set objNamespace = objOutlook.GetNamespace("MAPI")
Set objFolder = objNamespace.GetDefaultFolder(olFolderInbox)
strFolderName = objFolder.Parent
Set objMailbox = objNamespace.Folders(strFolderName)
Set objNewFolder = objMailbox.Folders.Add("Employee Directory")
objNewFolder.WebViewURL = "http://192.168.61.100/StaffView"
objNewFolder.WebViewOn = True
Would it be easier just to reference this VB script in the Kix batch file?
| 
