Larry,

Again, thanks for your help.

I noticed that there were a couple of syntax errors in the last message you sent me and I am just asking for a quick clarification (see the ***** text):

do while occurs(";",lcsendstr) > 0
lctemp = alltrim(left(lcsendstr,at(";", lcsenstr)-1)
**** a) Missing last closing ) in the above line
**** b) Notice lcSendStr vs. lcSenStr in variable names
oSendTo = oDoc.GetFirstItem("SendTo")
if vartype(oSendTo) <> "O" then
loDoc.AppendItemValue("SendTo",lctemp)
else
oSendTo.AppendTotextList(lctemp)
endif
lcsenstr = substr(lcsendstr,at(";",lcsenstr)+1)
**** Notice lcSendStr vs. lcSenStr in variable names
enddo


Thanks again,

Kevin