Word Automation Missing Field Problem? (a2k (9.0.6926) SP-3 Jet 4.0 SP-8)

Topic

New Reply

I am printing the current record on a form to Word 2000 with automation

The following code works OK if there is a value in all 4 fields however if middle name or suffix is missing Partner1 in the Word document is blank

What do I have to change in the following code to print Partner1 is there is a missing field?

.ActiveDocument.Bookmarks("Partner1").Select
.Selection.Text = (CStr(Forms!frm_POS_DomesticPartnership!strFirstName)) & " " & _
                          (CStr(Forms!frm_POS_DomesticPartnership!strMiddleName)) & " " & _
                          (CStr(Forms!frm_POS_DomesticPartnership!strLastName)) & " " & _
                          (CStr(Forms!frm_POS_DomesticPartnership!strSuffix))

Thanks, John

Reply | Quote

Replies

Do you have an On Error Resume Next somewhere in there? CStr will fail if you supply it a null value. Why do you use CStr anyway? I assume that strFirstName etc. are text fields. so no conversion should be needed.

Reply | Quote

Was just using the following code, there was an on error resume, I remove CStr and all is OK

Thanks, John

How to send the current record to Word 2000 with automation
http://support.microsoft.com/kb/210271/%5B/url%5D

Reply | Quote