readicculus

Hello,

I am trying to create a new Journal Item in a public folder using VBScript in an Outlook 2000/Exchange 2000 enviroment. I get the Journal Item to create, but it defaults it to the Default Journal Folder in the Personal Folders.

This code is part of a custom contact form. The form will eventually link its information to the Journal Item.

This is what I have:

Sub CommandButton1_Click
Application.GetNamespace("MAPI").Folders("Public Folders").Folders("All Public Folders").Folders("CRM").Folders("Incoming Phone Calls").Folders("Incident Reports")

Application.CreateItem(4).Display

End Sub


The first action selects the folder (Thats all it does)

The CreateItem creates the journal Item in a personal folder... How do I get it to create a journal item in the Public Folder specified?


Thanks!

Wamphyri

CreateItem only creates default Outlook items. You need to use the add method of the Items collection (of your public folder).