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

"ecl_kazna@pochta.ru" <ecl_kazna@pochta.ru>;
мне нужно прочитать строчку и вытащить из <ecl_kazna@pochta.ru>; только ecl_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

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




смотрела в сторону
tt = "<ecl_kazna@pochta.ru>;"
? strtran( strtran( tt, "<"), ">")

тоже ничего не помогает, помогите пожалуйста..

Прибольшущее спасибочки, прибольшущее !!!