How to I can to add contact with field Notes (Type: Memo) in MS Access to Outlook

[uronmapu]

How to I can to add contact with field "Notes" (Type: Memo) in MS Access to field "Notes" in Outlook contact



Is it below ???

item.Notes = varNotes & ""

[June7]

Did that code fail? What was error message? How are you adding the item in Outlook? Are you linked to Outlook folder? Show full procedure code for analysis.

[uronmapu]

Please see code below:

item.Title = varTitle & ""
item.FirstName = varFull_Name & ""
item.Email1Address = varEmail_Company & ""
item.Email2Address = varEmail_Personal & ""
item.CompanyName = varCompany_Name & ""
item.HomeAddressStreet = varHome_Address & ""
item.BusinessAddressStreet = varCompany_Address & ""
item.JobTitle = varPosition & ""
item.User1 = varData_Source & ""
item.NotesName = varRemarks & "" (not ok)
item.FileAs = varFull_Name & ""
item.BusinessTelephoneNumber = varTelephone & ""
item.BusinessFaxNumber = varFax & ""
item.BusinessAddressCountry = varCountry & ""
item.Birthday = varBirthday & ""
item.Categories = varCategory & ""
item.WebPage = varWeb_Page & ""

Error Messages:
Run-time error '438':
Object doesn't support this property or method


Refer: http://www.planetsourcecode.com/vb/s...25134&lngWId=1

[June7]

I found a thread that says to use the Body property. The OP says that resolved the issue.

[uronmapu]

I don't understand

I still can't add Remarks Field to Item of Outlook contact

Refer via http://www.planetsourcecode.com/vb/s...25134&lngWId=1

[June7]

That link says nothing about contact note. Here is the thread I found that says to use the Body property http://www.outlookbanter.com/outlook...tes-field.html

[uronmapu]

I still can't add Notes Field from MS Access to Notes Item in Outlook Contact by vba

Please see attached file (I want to add Remarks Field to Notes Item)

Please advices

[June7]

According to the thread I reference, did you try:

item.Body = varRemarks

I don't understand the & "" (not ok) part.

[uronmapu]

Many thanks June

I'm using code below, It's ok now

item.Body = varRemarks & ""


P/s & "" (not ok) is comment