Что нового

Парсинг строки из HTML страницы

Yoshiyuki

Новичок
Сообщения
40
Репутация
0
Добрового времени суток, есть HTML страница
Код:
<h3>Список мод-в в Сети</h3>


<table>
<thead>
<tr>
<td>Комьюнити</td><td class="c2">Модераторы</td>
</tr>
</thead>
<tbody>
			<tr class='lb1'><td><b>EN</b></td><td><a href="/mouse/Newmod">Newmod</a>, <a href="/mouse/Rype">Rype</a>, <a href="/mouse/Tummbumm">Tummbumm</a>, <a href="/mouse/Zingo">Zingo</a></td></tr>
			<tr class='lb2'><td><b>BR</b></td><td><a href="/mouse/Dollsg">Dollsg</a>, <a href="/mouse/Dominike">Dominike</a>, <a href="/mouse/Letrasjapas">Letrasjapas</a>, <a href="/mouse/Micaelad">Micaelad</a>, <a href="/mouse/Tarjaturunen">Tarjaturunen</a></td></tr>
			<tr class='lb1'><td><b>FR</b></td><td><a href="/mouse/Modocteurcox">Modocteurcox</a>, <a href="/mouse/Modopoly">Modopoly</a>, <a href="/mouse/Modozap">Modozap</a></td></tr>
			<tr class='lb2'><td><b>TR</b></td><td><a href="/mouse/Modoblues">Modoblues</a>, <a href="/mouse/Nehirr">Nehirr</a></td></tr>
			<tr class='lb1'><td><b>RU</b></td><td><i>Нету никого в сети, извините</i></td></tr>
			<tr class='lb2'><td><b>ES</b></td><td><i>Нету никого в сети, извините</i></td></tr>
			<tr class='lb1'><td><b>CN</b></td><td><a href="/mouse/Klauszhang">Klauszhang</a>, <a href="/mouse/Xiezi">Xiezi</a></td></tr>
			<tr class='lb2'><td><b>VK</b></td><td><a href="/mouse/Zingo">Zingo</a></td></tr>
</tbody>
</table>
Нужно вывести эту строчку
Код:
<tr class='lb1'><td><b>RU</b></td><td><i>Нету никого в сети, извините</i></td></tr>
И сделать каждый 5 минут проверку страницы, если будет не "Нету никого в сети, извините" а что-то другое, например
Код:
<tr class='lb1'><td><b>RU</b></td><td><a href="/mouse/Rooooney">Rooooney</a>, <a href="/mouse/Zubki">Zubki</a></td></tr>
То нужно выполнить действие например закрыть процесс.
Как это можно реализовать?
 

axlwor

Скриптер
Сообщения
657
Репутация
147
Код:
#include <ie.au3>
$sURL = ''
$oIE = _IECreate($sURL)
while 1
$sHTML = _IEDocReadHTML($oIE)
$sSubString = '<td><b>RU</b></td><td><i>Нету никого в сети, извините</i></td></tr>'
if StringInStr($sHTML, $sSubString) = 0 then
_Action()
endif
sleep (1000*60*5)
wend

func _Action()
;делаем что нужно
endfunc
 
Автор
Y

Yoshiyuki

Новичок
Сообщения
40
Репутация
0
Спасибо, но при запуске выдаёт
Все уже разобрался)
 
Верх