Доступ к существующему объекту InternetExplorer

@ProgerLink · Регистрация: 20.09.2010

Студворк — интернет-сервис помощи студентам

Привем всем.
Друзья, кто знает, как подключиться к существующему объекту "InternetExplorer.Application", и его свойству "Document" со всем содержимым страницы ???
Через COMОбъект("Shell.Application") можно получить все Эксплореры, но свойство document будет без содержимого страницы.

Приемлем любой вариант, в том числе используя WSH/WMI/Delphi/C

P.S. Сишники, я знаю для вас нерешаемых задач нет, предложите вариант решения проблемы моей.

Добавлено через 9 минут
рассмотрю вариант за вознаграждение

@alexsamos33 · 04.05.2014, 15:17

Вот пример на VBScript ie1tst.vbs

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Dim Url, MsgText, Loaded
Url = "https://www.cyberforum.ru/com-ole/thread967658.html"
Set IE = WScript.CreateObject("InternetExplorer.Application")
IE.visible = 1
IE.navigate(Url)
LoadWait()
MsgText = IE.document.getElementById("post_message_5130073").innerTEXT
MSGBox MsgText, 0, "POST message"
WScript.sleep(5000)
IE.quit
 
Sub LoadWait
Loaded = False
While Loaded = False
If IE.readyState = "complete" Or IE.readyState = 4 Then Loaded = True
WScript.sleep(100)
WEnd
End Sub

Новые блоги и статьи Все статьи Все блоги /
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .

@ProgerLink 0 / 0 / 0 Регистрация: 20.09.2010 Сообщений: 23

	Доступ к существующему объекту InternetExplorer 02.10.2013, 22:58. Показов 1978. Ответов 1 Метки нет (Все метки) Привем всем. Друзья, кто знает, как подключиться к существующему объекту "InternetExplorer.Application", и его свойству "Document" со всем содержимым страницы ??? Через COMОбъект("Shell.Application") можно получить все Эксплореры, но свойство document будет без содержимого страницы. Приемлем любой вариант, в том числе используя WSH/WMI/Delphi/C P.S. Сишники, я знаю для вас нерешаемых задач нет, предложите вариант решения проблемы моей. Добавлено через 9 минут рассмотрю вариант за вознаграждение 0