View Single Post
  #2  
Old November 8th 06, 02:49 PM posted to microsoft.public.outlook.program_vba
Ken Slovak - [MVP - Outlook]
external usenet poster
 
Posts: 5,848
Default Outlook 2k3 Script: Pb saving data in custom item

Are those controls bound to the UserProperty's you created? If not the code
will have to read the user properties on Item_Open and set the controls
then.

I'd probably check for Item.EntryID = "" as my new item test.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm


"news.microsoft.com" wrote in message
...
Hi All,

I've made my own task form and added many personal Item, I set tow of them
in read only , to prevent manual modification of these value

on the first I put the Number of the task (personal calculated Number)
on the second I put other calculated value

these values are calculated once by my script only if it is a new Task,
when I Open a new task the value are correct, but when I save and reopen
a task the value are set to 0 zero

When I set the Box to read / Write the correct values are stored

I use this to display the value on my Form

CustomIdBox is the name of the box CustomId is the field
displayed in CustomBox TheVALUE is the calculated value

If Item.LastModificationTime = #1/1/4501# Then
FormPage.Controls("CustomIdBox").value = TheVALUE
CustomId = TheVALUE
item.mileage = TheVALUE
else
FormPage.Controls("CustomIdBox").value = item.mileage
'End If


Tks for help


Ads