I could say I just wanted to keep you on your toes. ;-)
Actually, I wrote this on one machine, copied it to the machine whre I access the UT, ran and debugged it on the other machine and never updated the copy. Sorry. ;-(
Did it help?
>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
Larry Miller
MCSD
LWMiller3@verizon.netAccumulate learning by study, understand what you learn by questioning. -- Mingjiao