[Mike909]

Вот так примерно:

Код:

#include <IE.au3>

Local $oIE, $oLinks, $tags
Local $link = "http://www.example.com/"
_IEErrorNotify(False)

; Открываем IE
If  IsObj($oIE) Then
   _IEQuit($oIE)
EndIf   
$oIE=_IECreate($link,1,0,1)    

ConsoleWrite ( $link & @LF)
_IENavigate($oIE, $link, 0)       ; тут не ждем пока загрузится
_IELoadWait($oIE, 5000 , 15000)      ;  а тут ждем максимум 15 сек
        
If not @error Then        
                    $tags = $oIE.document.GetElementsByTagName("title")        
                    if  IsObj($tags) Then
                        ConsoleWrite ('tags=' & $tags.Length & @LF)
                        Sleep(200)
                        For $tag in $tags                         
                            $class_value = $tag.className
                            $innerText_value = _IEPropertyGet($tag, 'innertext')
                            ConsoleWrite ('innerText_value=' & $innerText_value &@LF)                       
                        Next
                    Else
                       ConsoleWrite ('tags no obj' & @LF)
                    EndIf
EndIf

If IsObj($oIE) Then
   _IEQuit($oIE)
EndIf
ConsoleWrite ("Exit au3." & @LF)

[Паразит]

Чё-то он выдаёт ошибку. В файле IE.au3 344-я строка.

Код:

$sTmp = $oWindow.type ; Is .type a valid property?
$sTmp = $oWindow^Error

[Mike909]

У меня без ошибок. Пробовал разные ссылки и https тоже.
IE 11 на Windows 10 x32, autoit 3.14

[Паразит]

А у меня Хрюша и IE 6.
Ну ладно, спасибо.

[Mike909]

на хрюше вроде ie 8 или даже 9 есть )))

[Iska]

Mike909, какой смысл в вечно ложном условии:

Код:

If  IsObj($oIE) Then
   _IEQuit($oIE)
EndIf

?! Какой смысл делать переход на ссылку два раза:

Код:

$oIE=_IECreate($link,1,0,1)    
…
_IENavigate($oIE, $link, 0)

?

Мой вариант:

Скрытый текст

Код:

#include <IE.au3>
#include <MsgBoxConstants.au3>

AutoItSetOption("MustDeclareVars", 1)

Local $oIE        = _IECreate("https://www.google.com", 0, 0)
Local $oDocument = _IEDocGetObj($oIE)
MsgBox($IDOK, "https://www.google.com", $oDocument.title)

_IENavigate($oIE, "http://www.yandex.ru/")
$oDocument = _IEDocGetObj($oIE)
MsgBox($IDOK, "http://www.yandex.ru/", $oDocument.title)

_IEQuit($oIE)

Exit(0)

[Паразит]

Iska, спасибо. Ваш скрипт работает. Интересно, а будет ли он работать на любых операционных системах?
Хотя-бы, чтобы начиная с ХР, кончая 10-ой. И чтобы от разрядности не зависел.

[Iska]

Паразит, проверяйте, мне не на чем. Могу сказать одно: работать будет не везде. Например, данный форум и сайт на IE11 без установки режима совместимости дадут ошибку обработки. Соответственно, и скрипт «обломается».

[Паразит]

А как выставить такой режим?