Что нового

Ошибка IE.au3 - Wend Error

AlexVong

Новичок
Сообщения
112
Репутация
1
Подскажите пожалуйста... Для сбора информации с веб страницы использую след.код
Код:
#include <IE.au3>

$NN=@YEAR&"."&@MON&"."&@MDAY&"__"&@HOUR&".."&@MIN&".."&@SEC&".."&@MSEC

$aList = WinList('[CLASS:IEFrame]', '')
If IsArray($aList) Then
    $oIE = _IEAttach($aList[1][1], 'embedded', 1)
EndIf

$oFrame = _IEFrameGetObjByName ($oIE, "main")

For $i = 1 To 700 ; в цикле
  $Pages = 'Page$' & $i
   $oFrame.document.parentwindow.execScript("__doPostBack('Sd','" & $Pages & "')")
	_IELoadWait($oFrame)
	  Sleep (1000)
      $sHTML = _IEDocReadHTML($oFrame) ; get the generated HTML
	  Sleep (1000)
       $str=StringRegExpReplace($sHTML,'(?s)^.+?(<DIV class=nowrap>.+)<TR class=footerRow>.+','\1')
           $str=StringRegExpReplace($str,'<TD align=[^>]+>([^<]*)</TD>\R','\1;')
                $str=StringRegExpReplace($str,'<TD noWrap[^>]+>([^<]*)</TD>\R','\1;')
                 $str=StringRegExpReplace($str,'<DIV class=nowrap>.*\R','')
                  $str=StringReplace($str,'<TD style="WIDTH: 1px">', '')
                   $str=StringRegExpReplace($str,'<TD noWrap[^>]+>([^<]*)</TD>\R','\1;')
  
FileWrite(@ScriptDir & '\Exp\' & $NN & '.csv',$str)
Next


После запуска чз время (на 5-ой, 6-ой, 7-ой странице и т.д.) выводится сообщение о ошибке....



Может что-то напутал в скрипте ?
 

inververs

AutoIT Гуру
Сообщения
2,135
Репутация
465
Это ошибка самой IE.au3. Неправильно написана функция _IELoadWait
Вы тут не причем.
Качайте эту версию
 
Верх