Jack,
| Thoughts?
I suspect that sttUser.strNote is an empty string, as the following code
works as I stated:
Dim app As New Outlook.Application
Dim contact As Outlook.ContactItem =
DirectCast(app.CreateItem(Outlook.OlItemType.olContactItem),
Outlook.ContactItem)
contact.FirstName = "Jack"
contact.LastName = "Black"
contact.Body = "This is the body of the contact!"
contact.Save()
Return
Are you certain, positive, without a shadow of a doubt, that sttUser.strNote
is not an empty string?
--
Hope this helps
Jay
T.S. Bradley -
http://www.tsbradley.net
| Jay, thanks for responding!
|
| In my code I'm writing new records via the CreateItem method of the
| Outlook.Application object (Outlook.ContactItem). Sample code follows:
|
| Dim oCT As Outlook.ContactItem =
| oApp.CreateItem(Outlook.OlItemType.olContactItem)
| With sttUser
| If .strFullName <> "" Then oCT.FullName = .strFullName
| If .strFirstName <> "" Then oCT.FirstName = .strFirstName
| If .strNote <> "" Then oCT.Body = .strNote
| If .strTitle <> "" Then oCT.Title = .strTitle
| oCT.Save()
| End With
|
| "sttUser" is a structure that contains data imported from another contact
| manager application; some lines have been deleted to save bandwidth.
There
| are no errors thrown during the Save operation, and all data (except
..Body)
| are written correctly.
|
| Thoughts? Thanks!
| Jack
|
|
| message
| > Can you show code where you are using the Body property?
|
|