Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   AutoIt (http://forum.oszone.net/forumdisplay.php?f=103)
-   -   Поиск заданного текста в коде формы с периодическим её обновлением. (http://forum.oszone.net/showthread.php?t=231723)

BAORope 30-03-2012 19:52 1890286

Поиск заданного текста в коде формы с периодическим её обновлением.
 
Здравствуйте!
Прошу помощи в написании скрипта для AutoIt цель, которого искать заданный текст внутри кода странички, которая генерируется и изменяется.
Искать постоянно, с заданной периодичностью обращения к форме после её обновления.
Заранее прошу прощения, т.к. последний раз программировал почти 10 лет назад и могу тупить в нюансах.
Из темы [решено] Поиск слова в исходном коде html страницы?????? смог унести только часть первоначального кода, т.к. под конец он настолько разросся,ввиду специфики, что мне его не воспринять к сожалению :(


PHP код:

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>

_IEErrorHandlerRegister()

$oIE _IECreateEmbedded()
$hForm GUICreate("Программа поиска в правильном месте правильнынго слова"1140580_
        
(@DesktopWidth 640) / 2, (@DesktopHeight 580) / 2_
        $WS_OVERLAPPEDWINDOW 
$WS_VISIBLE $WS_CLIPSIBLINGS $WS_CLIPCHILDREN)
$GUIActiveX GUICtrlCreateObj($oIE551130520)
$GUI_Button_Test GUICtrlCreateButton("Перейти на нужную страничку"5553015030)
$GUI_Button_Check GUICtrlCreateButton("Искать в коде слово каждые 5 секунд: "24553015030)
GUICtrlSetState(-1$GUI_DISABLE)

GUICtrlSetState(-1$GUI_DISABLE)
GUISetState()

_IENavigate($oIE"http://ya.ru/")

While 
1
    $msg 
GUIGetMsg()
    
Select
        
Case $msg $GUI_EVENT_CLOSE
            
Exit
        Case 
$msg $GUI_Button_Test
            _IENavigate
($oIE"http://ya.ru/")
            
GUICtrlSetState($GUI_Button_Check$GUI_ENABLE)
        Case 
$msg $GUI_Button_Check            
            $sText 
_IEBodyReadText($oIE)
            If 
StringInStr($sText"СРОЧНАЯ НОВОСТЬ") <> 0 Then
                MsgBox
(266256"Ошибка!""Вы не нашли нифига, страничка обновиться с повторной отправкой данных для формы и поиск пройдёт заново ЧЕРЕЗ 5 СЕКУНД")
            Else
                If 
MsgBox(266308"Успех!""Вы успешно нашли что искали!" & @CRLF & @CRLF _
                        
"Здорово было бы просто ГРОМКИЙ СИГНАЛ об обнаружении в коде страничке искомого текстового элемента") = 6 Then Run("notepad")
            EndIf
            
GUICtrlSetState($GUI_Button_Test$GUI_ENABLE)
    
EndSelect
WEnd 


Помогите пожалуйста добавить:
1. Поле из которого брать образец для поиска в коде
2. Сделать цикл в 10 секунд обновления странички с повторной отправкой данных формы, т.е. как бы автоматическое нажатие "Далее", когда выскакивает "Подтвердите повторную отправку формы"
3. Проиграть определённый файл звуковой долгий-громкий, если искомый код будет найден


Буду Вам очень признателен за помощь!

P.S.
Страничка в которой требуется искать текс в коде заканчивается на cgi-bin/tcgi1.exe


Время: 18:44.

Время: 18:44.
© OSzone.net 2001-