Перехватить N символов HTML из строки. Текущий метод реализации не идеален. Процесс таков: найти начало различных элементов управления из строки, затем последовательно разделить их, поместить в массив, а затем добавить в него один за другим. массив. Подойдите и посмотрите, больше ли этот символ, чем заданный. Если да, то верните этот массив.
«Имя функции: getHTMLContent» Параметры: НЕТ --> Количество символов, которые необходимо получить, txtContent --> Строка, подлежащая обработке.
'Функция: перехватить N символов HTML из строки. Текущий метод реализации не идеален. Процесс таков: найти начало различных элементов управления из строки, затем отделить их, поместить в массив, а затем добавить по одному. массив, чтобы узнать, больше ли символ, чем заданный. Если да, то верните этот массив.
'Автор: Лю Юнфа
'Время: 2007-6-1 20:03 :)
Функция getHTMLContent(НЕТ, txtContent)
Если Len(txtContent)<= НЕТ Тогда
getHTMLContent = txtContent
ВыходФункция
КонецЕсли
Установить re =Новое регулярное выражение
re.IgnoreCase = Истина
re.Global = Истина
patrn =<p|<br|<li|<таблица
шаблон = Разделить(патрн, |)
ForEach p в шаблоне
re.Pattern = р
txtContent = re.Replace(txtContent,||& p )
Следующий
txtContent = Разделить(txtContent,||)
ForEach E в txtContent
Если Len(s)>НЕТ ТогдаExitFor
с = с + Е
Следующий
getHTMLContent=s
Конечнаяфункция
%>