RE: Forms

  • From: "Kenn Garroch" <kenn@xxxxxxxxxx>
  • To: "'[ExchangeList]'" <exchangelist@xxxxxxxxxxxxx>
  • Date: Thu, 14 Feb 2002 16:23:00 -0000

This is not that simple (unfortunately) as you have to change the message class 
of all of the forms and while help (Contents, Advanced Customisation, Working 
with forms, Change the form used by existing items  in a folder) does provide 
an idea of the solution it will take a bit of work to adapt it to your needs.

In some cases you may need to change the form associated with items that are 
already in a folder. This is often necessary after importing items, or if you 
create a custom form after you have already created items based on a standard 
Microsoft Outlook form.

The Message Class field cannot be directly changed using the Outlook user 
interface, but you can use VBScript, Visual Basic, or Visual Basic for 
Applications to change the Message Class field.

The following Automation code can be used as a basis for developing your own 
solution. This code assumes that the name of the new form is MyForm. It will 
change all contacts in your default contacts folder so that they will use 

Sub ChangeMessageClass()
Set olApp = New Outlook.Application
Set olNS = olApp.GetNameSpace("MAPI")
Set ContactsFolder = _
Set ContactItems = ContactsFolder.Items
For Each Itm in ContactItems
   If Itm.MessageClass <> "IPM.Contact.MyForm" Then
      Itm.MessageClass = "IPM.Contact.MyForm"
   End If
End Sub
Someone somewhere must have used this code to generate a macro that will do a 
'general' job...If not, and I can find the time, it shouldn't be too hard - and 
would be pretty useful.

 -----Original Message-----From: Juan Ibarra [mailto:jibarra@xxxxxxxxxxx]Sent: 
14 February 2002 16:08To: [ExchangeList]Subject: [exchangelist] Forms

  I have an outlook form that is associated with a mailbox.  I want to replace 
this form with a different one.  Any ideas of where to do this?  I don't seem 
to find it anywhere.
  thanks in advance
  Juan Ibarra

  You are currently subscribed to this Discussion List as: 
  To unsubscribe send a blank email to leave-exchangelist-668885C@xxxxxxxxxxxxx 

Other related posts: