Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2002.11.18;
Скачать: [xml.tar.bz2];

Вниз

Как разобрать email адрес (получить его в чистом виде)   Найти похожие ветки 

 
msgipss   (2002-09-18 09:45) [0]

Как из email адреса например "пам пам пам<pampam@mail.ru>" получить чистый адрес "pampam@mail.ru", свою обработку писать не получается долго сильно, не успеваю обработать все, как быстрее, наверняка должна быть какая нить функция


 
Anatoly Podgoretsky   (2002-09-18 09:55) [1]

Так Pos + copy что еще проще может быть


 
msgipss   (2002-09-18 10:01) [2]

Дык я думаю что вместо "<" или ">" могет быть что угодно, или я ошибаюсь


 
Anatoly Podgoretsky   (2002-09-18 10:10) [3]

Ты начинаешь менять постановку задачи, но меняешь в правильном направлении. Все тоже самое, только делаешь функцию и в ней призводишь разбор по вараиантам. Варианты могуть весьма разные, но формление в виде функции позволит абстрагировать данный процесс.


 
dima_______!!!   (2002-09-18 10:21) [4]

{ var Mal:string - содержит адрес с "ПАМ"ами}
result:=copy(Mal,pos("<",Mal)+1,pos(">",Mal)-pos("<",Mal)-1);

Порще не знаю!!!<a href="#">


 
msgipss   (2002-09-18 10:29) [5]

А какие еще могут быть символы окромя ковычек, имя пользователя + адресс делает мэйлер, как я понимаю, надеюсь ковычки используются везде, ладно буду разбирать вручную, спасибо


 
REA   (2002-09-18 14:02) [6]

Как вариант: найти последний @ в строке - слева и справа найти одиноковые символы и не (буква, точка два крючочка). Все что между ними - адрес.



Страницы: 1 вся ветка

Форум: "Система";
Текущий архив: 2002.11.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
1-59094
_Nicola_
2002-11-05 17:45
2002.11.18
Сохранить набор иконок в 1 файле


1-59117
Eugene_
2002-11-08 11:27
2002.11.18
Создание массива из области памяти


1-59169
poratora
2002-11-09 08:41
2002.11.18
Не могу запустить Word


1-59280
iNew
2002-11-07 17:18
2002.11.18
Как определить, что в ячейке ValueListEditor1.Cells


1-59160
Павел Хабаров
2002-11-06 12:29
2002.11.18
Печать текстового файла





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский