Поиск ссылки по тегу

[getigor01]

После обновления AutoIT до v3.3.10.2 при выполнении данных действий выдаётся ошибка, мучаюсь 3й день :stars: помогите решить её

$sHtml = _IETagNameGetCollection($IE, 'a')
	  For $Html In $sHtml
	  if StringRegExp($Html.href, "текст", 0) then
      _IEAction($Html, "click")
	  ExitLoop
	  ExitLoop
      Endif
   next

 

[InnI]

getigor01 [?]

выдаётся ошибка

Что за ошибка? У меня на 3.3.10.2 (Win7 с IE10) ваш код работает

#include "IE.au3"

$IE = _IECreate("ya.ru")
$sHtml = _IETagNameGetCollection($IE, 'a')
For $Html In $sHtml
  If StringRegExp($Html.href, "artlebedev", 0) then
    _IEAction($Html, "click")
    ExitLoop
  Endif
Next

 

[getigor01]

Error: Variable must be of type "Object"

Скрипт перепроверял много раз, всё на своих местах, по другому данные действия проделать никак?
P.s. Windows 7, IE 10

 

[InnI]

Иногда случается такое (примерно один раз на 20-30 запусков)

>Running:(3.3.10.2):D:\AutoIt3\autoit3.exe "C:\Users\***\Desktop\AutoIt v3 Script.au3"    
--> Press Ctrl+Alt+F5 to Restart or Ctrl+Break to Stop
--> IE.au3 T3.0-1 Error from function _IECreate,  (Browser Object Creation Failed)
--> IE.au3 T3.0-1 Error from function _IETagNameGetCollection, $_IEStatus_InvalidDataType
"C:\Users\***\Desktop\AutoIt v3 Script.au3" (5) : ==> Variable must be of type "Object".:
For $Html In $sHtml
For $Html In $sHtml^ ERROR
->16:18:51 AutoIt3.exe ended.rc:1
+>16:18:51 AutoIt3Wrapper Finished..
>Exit code: 1    Time: 0.401

Добавлено:

Сообщение автоматически объединено: 30 Янв 2014

Бывает и такое (когда объект пропадает)

>Running:(3.3.10.2):D:\AutoIt3\autoit3.exe "C:\Users\***\Desktop\AutoIt v3 Script.au3"    
--> Press Ctrl+Alt+F5 to Restart or Ctrl+Break to Stop
--> IE.au3 T3.0-1 Error from function _IELoadWait, $_IEStatus_ClientDisconnected (-2147023174, Browser has been deleted prior to operation.)
--> IE.au3 T3.0-1 Error from function _IETagNameGetCollection, $_IEStatus_InvalidObjectType
"C:\Users\***\Desktop\AutoIt v3 Script.au3" (5) : ==> Variable must be of type "Object".:
For $Html In $sHtml
For $Html In $sHtml^ ERROR
->16:41:06 AutoIt3.exe ended.rc:1
+>16:41:06 AutoIt3Wrapper Finished..
>Exit code: 1    Time: 1.711

getigor01, а у вас что приводит к ошибке?

 

[getigor01]

Неизвестность

Иногда случается такое (примерно один раз на 20-30 запусков)

Вот это и надоело, хотел бы избавиться, но мне не под силу :(

 

[InnI]

getigor01, попробуйте так

For $i = 1 To 100
  $IE = _IECreate("ya.ru")
  If IsObj($IE) Then ExitLoop
  Sleep(100)
Next
If $i = 101 Then
  MsgBox(0, "Ошибка", "Невозможно создать объект IE")
  Exit
EndIf