На страничке в Firefox есть следующий код:
Необходимо получить в две переменные значение коммутатора '5-02-02-11' и порта '2'
Использовал FF.au3, ни одна функция не смогла выдергнуть эти значения.
Может быть использовать регулярные выражения,
сначала получив html всей страницы, записать в переменную, оттуда найти слово "Коммутатор", просмотреть вперед 50-60 символов и регулярными выражениями получить две переменные, примерно так:
Может быть есть другие идеи?
Добавлено:
Решил вопрос так:
Код:
<tr>
<td align="left"> </td>
<td align="left"><label for="exec[adr_one_countryname]"></label><a>Коммутатор</a> </td>
<td style="font-weight: bold;" align="left">5-02-02-11 ?>порт 2 ?>4.4</td>
</tr>
Использовал FF.au3, ни одна функция не смогла выдергнуть эти значения.
Может быть использовать регулярные выражения,
сначала получив html всей страницы, записать в переменную, оттуда найти слово "Коммутатор", просмотреть вперед 50-60 символов и регулярными выражениями получить две переменные, примерно так:
Код:
#include <FF.au3>
#include <array.au3>
Opt("WinTitleMatchMode", 2)
WinActivate("Mozilla Firefox")
If _FFConnect(Default, Default, 3000) Then
$sText = _FFReadHTML()
;~ что-то делаем
MsgBox(0, 'Найдено:', $sText)
Else
MsgBox(64, "", "Can't connect to FireFox!")
EndIf
Добавлено:
Сообщение автоматически объединено:
Решил вопрос так:
Код:
#include <FF.au3>
Opt("WinTitleMatchMode", 2)
WinActivate("Mozilla Firefox")
If _FFConnect(Default, Default, 3000) Then
$sText = _FFReadHTML()
$sPoz = StringInStr($sText,'Device ')
$sStr = StringMid($sText, $sPoz+64,15)
$sIP = StringRegExpReplace($sStr,"[^\d\.\-]","")
$sPoz2 = StringInStr($sText,' port ')
$sStr2 = StringMid($sText, $sPoz2,8)
$sPort = StringRegExpReplace($sStr2,"[^\d]","")
EndIf