0 Пользователей и 20 Гостей просматривают эту тему.
//Reference curPos := PosFrom('>Справка:</font>', HTML, EndPos); if curPos > 0 then begin curPos := curPos + Length('>Справка:</font>'); EndPos := PosFrom('</p>', HTML, curPos); AddFieldValue(mfTagline, Trim(RemoveTags(Copy(HTML, curPos, EndPos - curPos), False))); end;
Нет, а какое этому практическое применение?
А почему бы не использовать доп. пользовательское поле?
//Description curPos := PosFrom('Краткое содержание:</font>', HTML, EndPos); if curPos > 0 then EndPos := curPos; AddFieldValue(mfDescription, TextBetween(HTML, 'Краткое содержание:</font>', '</p>', True, EndPos));
//Description curPos := PosFrom('Краткое содержание:</font>', HTML, EndPos); if curPos > 0 then EndPos := curPos; AddFieldValue(mfDescription, TextBetween(HTML, '<p align=justify class=''review''>', '</td>', True, EndPos));
//Reference curPos := PosFrom('>Справка:</font>', HTML, EndPos); if curPos > 0 then begin AddFieldValue(mfTagline, TextBetween(HTML, '>Справка:</font>', '</p>',True, EndPos)); end;
//Wikipedia URLs AddFieldValue(mfURL, HTMLValues(HTML, '<b>Википедия</b>:</td></tr></table>', '</td></tr></table>', '<a href = "', '"', ' ', EndPos));
//Aditional URLs AddFieldValue(mfURL, HTMLValues(HTML, 'На других сайтах</b>:</td></tr></table>', '</td></tr></table>', '<a href = "', '"', ' ', EndPos));
AddFieldValue(mfURL, MovieURL);
Единственное может я попробую (если получиться) сделать импорт постеров с дополнительной страницы (там переодически присутствует несколько постеров). Отсюда вопрос к nostra: можно ли импортировать несколько постеров с помощью существующего кода? Точнее с помощью вот этой команды: ExtraLinks[smPoster].Если нет, то я наверное забью на эту доп. функцию скрипта (она не такая уж и обязательная)!