Zloy_Gelud
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Yakim777
К примеру, функция IE.FindByClass вернет массив, в котором каждый пункт - текст в соответствии с заданным для поиска классом.
Код: IE = {};
function IE.FindByClass(strHTMLText, strClass)
local tblResult = {};
local nPos = String.Find(strHTMLText, strClass, 1, false);
local nStart = nPos + String.Length(strClass) + 2;
local nEnd = String.Find(strHTMLText, "</", nStart, false);
while (nPos ~= -1) do
tblResult[Table.Count(tblResult) + 1] = String.Mid(strHTMLText, nStart, nEnd - nStart);
nPos = String.Find(strHTMLText, strClass, nEnd, false);
nStart = nPos + String.Length(strClass) + 2;
nEnd = String.Find(strHTMLText, "</", nStart, false);
end
if (Table.Count(tblResult) == 0) then return nil else return tblResult end
end
strHTMLText = TextFile.ReadToString("C:\\opr000PC.htm");
strClass = "text_head2";
tbl = IE.FindByClass(strHTMLText, strClass)
if (tbl ~= nil) then
for i, v in tbl do
Dialog.Message("", v, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
end |
Может пригодится тебе для выборки.. |
-умер, сорри... 
Ответы на наиболее часто задаваемые вопросы: 
