A long time ago I wrote a small Outlook 2003 form. The goal of the form was quite simple: creating a custom appointment by presenting the user with two additional text fields, and, upon exiting, add the content of the fields to the subject. I am trying to use this form from within Outlok 2007 and it does not add anything to the subject.
I imported the form successfully, I can open it, I see my custom fields. I assume there is something wrong with the VB code used to modify the subject.
Any help or pointer would be appreciated.
intPos = Instr(Item.Subject,"[")
if intPos > 0 Then
strTemp = Left(Item.Subject, intPos-2)
Item.Subject = strTemp & " [" & Item.UserProperties.Find("fldActe").Value & "] - " & Item.UserProperties.Find("Statut").Value
Item.Subject = Item.Subject & " [" & Item.UserProperties.Find("fldActe").Value & "] - " & Item.UserProperties.Find("Statut").Value