• Авторизация


Как из Outlook открыть Internet Explorer 28-04-2006 10:45 к комментариям - к полной версии - понравилось!


Чтобы вывести некий HTML из Outlook (VB Script для форм), годится код:

Set objExplorer = CreateObject("InternetExplorer.Application")
objExplorer.Navigate "about:blank"
HTML="Hello World"
while objExplorer.ReadyState<4
'HERE MAY BE VERY NICE TO INSERT DO EVENTS :)
wend
objExplorer.Document.Body.InnerHTML=HTML
objExplorer.Visible = 1

В VBA в отличии от VB Script можно не дожидаться изменения ReadyState, т.е. обойтись без While или включить в цикл while вызов DoEvents, чтобы приложение не загружало процессор. В VB Script, если не дождаться ReadyState, вылетит ошибка.

Ну а если просто нужно перейти на нужную страничку:

Set objExplorer = CreateObject("InternetExplorer.Application")
objExplorer.Navigate "http://www.liveinternet.ru/users/fixin"
вверх^ к полной версии понравилось! в evernote


Вы сейчас не можете прокомментировать это сообщение.

Дневник Как из Outlook открыть Internet Explorer | fixin - Дневник fixin | Лента друзей fixin / Полная версия Добавить в друзья Страницы: раньше»