Article ID: 186453
Article Last Modified on 2/27/2004
Sub PublishForm()
Set ol = New Outlook.Application
Set olns = ol.GetNamespace("MAPI")
Set MyFolder = olNS.GetDefaultFolder(olFolderInbox)
Set MyItem = MyFolder.Items.Add("IPM.Note.MyForm")
Set MyForm = MyItem.FormDescription
MyForm.Name = "MyForm2"
MyForm.PublishForm olFolderRegistry, MyFolder
MyItem.Close olDiscard
End Sub
180826 OL98: Resources for Custom Forms and Programming
182349 OL98: Questions About Custom Forms and Outlook Solutions
Additional query words: OutSol OutSol98
Keywords: kbbug kbprogramming kbpending KB186453