Ошибка с вызовом oleacc.dll — ошибка доступа запрещена 80020009

Я пишу скрипт Functional Test для клиентского приложения от поставщика, который использует Internet Explorer_Server встроенные элементы управления. Мне трудно получить объект, чтобы я мог прочитать его HTML и проверить информацию. Я могу получить дескриптор для внутреннего контроля, и я пытаюсь использовать функцию ObjectFromLresult oleacc.dll, чтобы получить объект. Увы, он не работает из-за 80020009 Доступ запрещен.

Я надеюсь заставить это работать, или по крайней мере точно знать, почему это терпит неудачу. Вот код:

DllCall("ole32.dll", "long", "CoInitialize", "ptr", 0)

Local $typUUID = DllStructCreate("int;short;short;byte[8]")
DllStructSetData($typUUID, 1, 0x626FC520)
DllStructSetData($typUUID, 2, 0xA41E)
DllStructSetData($typUUID, 3, 0x11CF)
DllStructSetData($typUUID, 4, 0xA7, 1)
DllStructSetData($typUUID, 4, 0x31, 2)
DllStructSetData($typUUID, 4, 0x0, 3)
DllStructSetData($typUUID, 4, 0xA0, 4)
DllStructSetData($typUUID, 4, 0xC9, 5)
DllStructSetData($typUUID, 4, 0x8, 6)
DllStructSetData($typUUID, 4, 0x26, 7)
DllStructSetData($typUUID, 4, 0x37, 8)
If IsDllStruct($typUUID) Then
ConsoleWrite("$typUUID is a DLL Struct." & @LF)
Else
ConsoleWrite("$typUUID is NOT a DLL Struct." & @LF)
EndIf

$lResult = 49263Local $aRet = DllCall("oleacc.dll", _
"long", "ObjectFromLresult", _
"lresult", $lResult, _
"struct*", $typUUID, _
"wparam", 0, _
"idispatch*", 0)
If @error Then Return SetError(3, @error, 0)If IsObj($aRet[4]) Then
ConsoleWrite("$aRet[4] is an object!" & @lf)
Local $oIE = $aRet[4] .Script()
; $oIE is now a valid IDispatch object
Return $oIE.Document.parentwindow
Else
Return SetError(1, $aRet[0], 0)
EndIf

Некоторые заметки:

* Проверка IsDllStruct прошла успешно и сообщает, что $ typUUID является структурой Dll.

* $ LResult — это дескриптор внутреннего / встроенного элемента управления Internet Explorer_Server.

* Данные в позиции массива $ aRet [4] являются объектами.

* Там нет ошибки, пока Return $oIE.Document.parentwindow

0

Решение

Попробуй использовать

#include <IE.au3>

$oIE = _IEAttach("[REGEXPTITLE:ICQ; INSTANCE:2]", "embedded", 3)

В этом примере показано, как подключиться к клиенту ICQ, использующему встроенный элемент управления IE.

-2

Другие решения

Других решений пока нет …