ловлю адрес почтовый
в виде

"efda_kazna@pochta.ru" <efda_kazna@pochta.ru>;
так от мне нужно прочитать строчку в поле и вытащить из <efda_kazna@pochta.ru>; только efda_kazna@pochta.ru

делаю так

LsN1=at('<',ALLTRIM(vvv.From))
LsNaimEmail=SUBSTR(ALLTRIM(vvv.From),LsN1,LsN1)


LsN11=at('<',ALLTRIM(LsNaimEmail))
LsNaimEmail11=SUBSTR(ALLTRIM(LsNaimEmail),1,LsN1-1)
*!* MESSAGEBOX(LsNaimEmail11)

LsN3=at('>',ALLTRIM(LsNaimEmail11),1)

LsN2=at('<',ALLTRIM(LsNaimEmail11),1)

LsNaimEmail1=SUBSTR(ALLTRIM(LsNaimEmail11),LsN2+1,LsN3-LsN2-1)
?LsNaimEmail1

но эта не универсально, т.к. если приходит вот такой адрес

"ig S" <ig.rept@gmail.com>;
то я не могу вытащить нужный мне адрес ig.rept@gmail.com

помогите в написании универсальной искалки пожалуйста ???

Спасибо всем !!!