Создать объект WebBrowser

[Scuder]

Можно ли положить контрол на форму программно?

Что-то типа

Код: Выделить всё

Dim WithEvents WB As SHDocVw.InternetExplorer

Set WB = New SHDocVw.InternetExplorer
WB.Left = 240
WB.Top = 240
WB.Height = 7215
WB.Width = 11535
WB.Visible = True


В этом случае при

Код: Выделить всё

WB.Navigate App.Path & "\some.htm"

происходит открытие iexplore.exe.

[Sebas]

Э.... это не тот контрол, который тебе нужен. Тебе ж WebBrowser нужен...

[Scuder]

Э.... это не тот контрол, который тебе нужен. Тебе ж WebBrowser нужен...

Ну да. Нужен WebBrowser..

Делал так:

Код: Выделить всё

Dim WithEvents WBIE As SHDocVw.WebBrowser

Set WBIE = New SHDocVw.WebBrowser
WBIE.Left = 240

На последней строчке выдаёт ошибку "Automation Error". Почему?

[alibek]

Тебе нужен компонент "WebBrowser".

[Scuder]

Тебе нужен компонент "WebBrowser".

Либо я чего-то не понимаю, либо..

Компонент на форму в дизайн-моде, руками я положить могу. Так и есть сейчас. Но есть плавающий глюк. Причём, настолько плавающий, что отловить его никак не получается. Поэтому хочу попробовать создать объект программно. Суть проблемы именно в этом.

[Konst_One]

Код: Выделить всё

controls.add(...

и не забудь добавить лицензию в коллекцию лицензий, в MSDN есть пример

[Scuder]

Код: Выделить всё

controls.add(...

и не забудь добавить лицензию в коллекцию лицензий, в MSDN есть пример

Спасибо. Получилось.
Правда, лицензия не понадобилась, поскольку VB признал этот компонент родным..

ВОПРОС КО ВСЕМ:
Пока всё это делал, поймал-таки глюк, который мне последние 2 недели жить не давал. Точнее, это не глюк.. Это фича..

У меня своя звонилка. Она сама дозванивается и сама же отслеживает, есть реально соединение или нет. Если нет, она его рвёт и пытается звонить заново. В этот момент w2k, естественно, видит, что никакого соединения не установлено. И в этот же момент открывается WebBrowser! И хотя загрузить он должен страничку с локального диска, windows всё равно вызывает на экран окно со своей, родной звонилкой. И пока там не нажмёшь отмену или "закрыть", WebBrowser впадает в мёртвую спячку и вешает всё приложение. Так вот, как сделать так, чтобы эта родная звонилка не появлялась на экране вообще никогда, при том, что я не умею регистрировать свою звонилку как стандартную звонилку windows?

[GSerg]

Интернет эксплорер - Сервис - Свойства обозревателя - Подключения - Не использовать никогда.

[Scuder]

Интернет эксплорер - Сервис - Свойства обозревателя - Подключения - Не использовать никогда.

Нет, фишка в том, что моя звонилка всегда при дозвоне сама создаёт новое соединение и сама же его удаляет. Т.е. если открыть ту закладку, которую ты указал, то список там будет пустым.

Может, поглубже копнуть? В реестре, например?..