Christian Kjær wrote:

Hi all

I have designet an Outlook form in Outlook 2003 and it works very fine. But
when, I send it to my Outlook 2000 user it Only run some of the code. belov
I have postet the VBScript code. Can anybody se, what is wrong?

In 2K3, you use

Item.UserProperties.item("PostnummerTelefonscreeni ng").value

In 2K you have to write

Item.UserProperties.find("PostnummerTelefonscreeni ng").value


You may want to

select case split(outlook.application.version,".")(0)
case 9
'2K stuff
case 11
'2K3 stuff
end select


You may further want to encapsulate this code so that you can write

p = getUserProperty(item,property)
setUserProperty item, property, value


HTH, Wolfram