Показать сообщение отдельно
Старый 23.04.2010, 19:02   #1
Freez
Оператор ЭВМ
 
Аватар для Freez
 
Регистрация: 19.09.2009
Сообщений: 43
Написано 8 полезных сообщений
(для 10 пользователей)
Данные с icq.com

Hарод подскажите пожалуйста простой пример получения строки nickname с http://www.icq.com/people/full_detai...php?uin=666666

Я имею в виду сделать запрос к странице пропарсить текст и вывести на экран только ник.Желательно исходник

по поводу парсинга есть такое мнение

Цитата
---------------------------------------------------
Var
I:Integer;
S:string;
Begin
i:=pos('Nickname',S);
if i<>0 do
Begin
S:=copy(S,i,Length(S));
i:=pos('flvl',S);
S:=copy(S,i,Length(S));
i:=pos('</div>',S);
S:=copy(S,7,i-7);
End;
End;
Как вариант можно сделать так. Прошу ногами сильно не пинать, какая первая мысль по поводу прасинга в голову пришла, так и сделал =)

Изначально в переменной S должен быть весь код страницы, после выполнения этого куска, там останится лишь Ник.

Пример рабочй проверял. Работать будет до тех пор пока не изменят структуру сайта. Ну или у человека не будетв нике "</div>" =))
__________________________________________________ __________
(Offline)
 
Ответить с цитированием