I am newbie to VB. I have written a script that uses Word 2000 as a "printer" for data in a custom outlook 2000 form. The problem is that some of the fields in the outlook form contain more than 255 characters. 255 appears to be the limit on word field size.

I have tried to write a script that looks at the length of a field, if it's longer than 255 characters, the script returns the first 255 to one word field, the next 255 to another field, etc. (In the script below I have only concerned myself to the first 255 characters).

My problem is getting the string to actually show up in the field. The script continues running - no error messages show up - but the string is not entered into the field.

Any ideas? The script is below.

Thanks,

Mary

Sub AddTRData(objDoc)
Dim strValue
objDoc.FormFields("Company").Result = _
Item.UserProperties("Company").Value
If Len(Item.UserProperties("Description").Value) >= _
255 Then
objDoc.FormFields("Description").Result = _
Left(strDescription,255)
Else objDoc.FormFields("Description").Result = _
Item.UserProperties("Description").Value
End If
objDoc.FormFields("MailingAddress").Result = _
Item.UserProperties("MailingAddress").Value
objDoc.FormFields("MainPhone").Result = _
Item.UserProperties("MainPhone").Value
objDoc.FormFields("WebPage").Result = _
Item.UserProperties("WebPage").Value
objDoc.FormFields("Company").Result = _
Item.UserProperties("Company").Value
objDoc.FormFields("NCmanage").Result = _
Item.UserProperties("NCmanage").Value

End Sub