Показать сообщение отдельно
  #6  
Старый 28.08.2010, 17:29
gersio gersio вне форума
Прохожий
 
Регистрация: 10.01.2010
Сообщения: 5
Репутация: 10
По умолчанию

Цитата:
Сообщение от gersio
Спс за помощь. Очень помогло.... Только теперь опять проблема. Буду рад, если поможете.
Сделать нужно тоже самое, вытянуть инфу все же с того сайта. Вот ссыль:
http://ua.oriflame.com/products/prod...&prodCode=7191
_____________________________________________
Нужно вытащить:
1)Название продукта(Туалетная вода Lucia);
2)Описание продукта(Пусть аромат Lucia укажет вам путь к счастью! Этот цветочно-фруктовый букет, искрящийся ароматами лимона, цветков жасмина и индийского сандала, источает свет и чистоту. 50 мл.);
3)Его цену(194.00 грн.).
_____________________________________________
Делал как по ответу:
Код:
function title(link:string):string;
var
idHTTP:tidhttp;
i:integer;
s:string;
st:tstringlist;
const
tag_k='<div id="proddet-topbox-prodinfo">';
//site='http://ua.oriflame.com';
begin
result:='не нашли';
idhttp:=tidHttp.Create(form1);
st:=tstringlist.Create;
st.Text:=idhttp.Get(link);
for i:=0 TO ST.Count-1 DO
begin
if st.Strings[i]=tag_k then
begin
s:=st.Strings[i+18];
s:=copy(s,ansipos('>', s)+1,length(s));
s:=copy(s,0,ansipos('<', s)-1);
result:=s;
end;
end;
idHTTP.Free;
st.Free;
end;
Ответить с цитированием