Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут
закрыты.
Читайте
требования к создаваемым темам.
-
dr-vic
-
- Обычный пользователь

-
-
- Сообщения: 65
- Зарегистрирован: 13.01.2004 (Вт) 0:05
dr-vic » 29.10.2004 (Пт) 7:13
Подскажите, есть ли в ВБ возможность связать свой собственный IE или WebBrowser с уже существующим объектом InternetExplorer? Ситуация примерно такая - в эксплорер загружена некая страница и необходимо ее обработать прогой, которая запускается после прогрузки ХТМЛа по правому клику на ней.
Заранее благодарен.
-
Sebas
-
- Неуловимый Джо

-

-
- Сообщения: 3626
- Зарегистрирован: 12.02.2002 (Вт) 17:25
- Откуда: столько наглости такие вопросы задавать
-
Sebas » 29.10.2004 (Пт) 9:00
можно, ищи по форуму "IE spy" выкладывал Member(или нет? кто у нас в авартаре в уa.ru господ посылал?)
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?
sebas<-@->mail.ru
-
marvan
-
- Бывалый

-
-
- Сообщения: 269
- Зарегистрирован: 22.06.2004 (Вт) 13:26
- Откуда: Москва
-
marvan » 29.10.2004 (Пт) 9:34
-
alibek
-
- Большой Человек

-
-
- Сообщения: 14205
- Зарегистрирован: 19.04.2002 (Пт) 11:40
- Откуда: Russia
alibek » 29.10.2004 (Пт) 12:28
Что-то я не понял, а разве спрашивалось не о GetObject (вместо CreateObject)?
Lasciate ogni speranza, voi ch'entrate.
-
dr-vic
-
- Обычный пользователь

-
-
- Сообщения: 65
- Зарегистрирован: 13.01.2004 (Вт) 0:05
dr-vic » 30.10.2004 (Сб) 22:11
Господа, спасибо! Я посидел ударно ночь и сам разобрался - через коллекцию ShellWindows из shdocvw.dll:
Private IE As InternetExplorer
Private SW As ShellWindows
Set obj = New ShellWindows
Private Sub ListIEWindows()
Dim i As Integer
Dim IEDoc As HTMLDocument
If obj.Count = 0 Then MsgBox "Нет открытых Веб-страниц!": Exit Sub
For i = 0 To SW.Count - 1
Set IEDoc = SW.Item(i).document
List1.AddItem IEDoc.Title
Next
End Sub
Вернуться в Visual Basic 1–6
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot, PetalBot, Yandex-бот и гости: 7