Отображение документов HTML с помощью Internet Explorer

Щелкните на знаке "плюс" (+) рядом с библиотекой объектов Interop.SHDocVw, а затем на знаке "плюс" рядом с SHDocVw. Панель Objects заполнится списком объектов, предоставляемых библиотекой Microsoft Internet Controls, показанным ниже.

Прокрутите вниз панель Members, а затем щелкните на методе Navigate. Ваш экран будет выглядеть примерно так, как показано на рисунке вверху следующей страницы.

Метод Navigate открывает URL, указанный в списке параметров, который может быть либо адресом в интернете, либо документом HTML, расположенным где-то на вашем компьютере. Аргумент Flags указывает, следует ли добавлять этот URL в список истории Internet Explorer или в дисковый кэш. Аргументы TargetFrameName, PostData и Headers описывают, как должен открываться и определяться документ HTML в окне браузера. (Все эти аргументы необязательные.) Хотя это все может показаться сложным, метод Navigate очень прост в использовании. Во многих случаях это все, что требуется для просмотра документа HTML в вашем приложении.

Чтобы запустить программу, щелкните на кнопке Start (Начать), расположенной на стандартной панели инструментов. Ваша форма будет выглядеть аналогично следующей иллюстрации.

Щелкните на стрелке комбинированного списка формы, чтобы отобразить список предпочтительных веб-сайтов для программистов на Visual Basic. Вы увидите следующий список URL.

В вашем браузере комбинированный список может быть очень удобным элементом управления для представления URL пользователю. В моих веб-приложениях я обычно пытаюсь предоставлять на выбор пользователей четыре или пять URL, с которых они могут начинать работу со своими веб-приложениями. При этом они могут добавить свои собственные предпочтения, когда посетят другие сайты. Адреса в интернете, которые я включил в этот список, соединят вас с сайтами, которые могут быть интересны программистам на Visual Basic. Вы можете свободно использовать их, но заметьте, что через год или два один или два URL могут оказаться неверными. (Эти вещи очень быстро меняются.) В следующей таблице приведен список веб-сайтов, которые я представил в программе:

Щелкните на кнопке Показать HTML. Visual Basic откроет Internet Explorer и загрузит в браузер URL сайта Microsoft Visual Basic. Если вы не подключены к сети, Internet Explorer запросит у вас с помощью диалогового окна логин и пароль интернет-провайдера (ISP - Internet service provider) и соединит вас с интернетом. (Если вы подключаетесь к интернету через корпоративную сеть, у вас будет другой процесс регистрации.) Вы увидите домашнюю страницу Microsoft Visual Basic. (Ваш HTML-документ будет содержать более свежую информацию.)

Откройте код Form1 в Редакторе кода и прокрутите его в самый верх, где находятся объявления общих переменных. Вы увидите следующий программный код:

Public Explorer As SHDocVw.InternetExplorer

Программа Show HTML начинается с объявления открытой переменной с именем Explorer, которая будет выполнять соединение программы с объектом Internet Explorer. Тип переменной ассоциирован с классом InternetExplorer из библиотеки shdocvw.dll, которая должна быть включена в ваш проект с помощью команды Add Reference (Добавить ссылку) из меню Project (Проект). (В этом проекте я сделал эту ссылку за вас.)

Отобразите в Редакторе кода процедуру события Button1_Click. Вы увидите следующий программный код:

Private Sub Button1_Click(ByVal sender As System.Object, _
		ByVal e As System.EventArgs) Handles Button1.Click
	Explorer = New SHDocVw.InternetExplorer()
	Explorer.Visible = True
	Explorer.Navigate(ComboBox1.Text)
End Sub

Процедура события Button1_Click запускается, когда пользователь щелкает на кнопке Показать HTML формы и пытается перейти к URL или документу HTML, указанному в комбинированном списке. Процедура события начинается с присвоения открытой переменной Explorer нового объекта Internet Explorer. Затем процедура делает окно Internet Explorer видимым и открывает с помощью метода Navigate в браузере документ, который соответствует выбору пользователя в комбинированном списке (значение, которое в настоящий момент содержится в свойстве Text объекта комбинированного списка). В этот момент приложение Show HTML заканчивает выполнять свою часть процесса навигации, и внимание пользователя переключается на открытое окно Internet Explorer, которое управляет соединением с интернетом (если необходимо) и позволяет пользователю видеть выбранный веб-сайт и щелкать на любых имеющихся на странице гиперссылках.

Отобразите в Редакторе кода процедуру события Form1_Load. Вы увидите следующий программный код:

Private Sub Form1_Load(ByVal sender As System.Object, _
	ByVal e As System.EventArgs) Handles MyBase.Load
	'При запуске добавляем в выпадающий список несколько полезных 'веб-сайтов
	ComboBox1.Items.Add("http://www.microsoft.com")
	ComboBox1.Items.Add("http://www.microsoft.com/mspress")
	ComboBox1.Items.Add("http://msdn.microsoft.com/vbasic")
	ComboBox1.Items.Add("http://www.devx.com")
End Sub

Когда программа Show HTML загружается, пользователю автоматически представляется список из нескольких "предпочтительных" веб-сайтов. Эти URL представлены в комбинированном списке, который я настроил с помощью метода Add при загрузке формы в процедуре события Form1_Load. Вы можете свободно добавлять в этот список ваши любимые URL, используя дополнительные операторы Add - объект комбинированного списка включает полосы прокрутки, когда это необходимо, и может вместить очень много элементов.

Добавьте к объявлению переменной Internet Explorer после ключевого слова Public ключевое слово WithEvents. Ваше объявление объекта должно выглядеть примерно так:

Public WithEvents Explorer As SHDocVw.InternetExplorer

Введите в процедуре события Explorer_NavigateComplete2 следующий оператор программы:

ComboBox1.Items.Add(Explorer.LocationURL)

Ваша процедура должна выглядеть примерно так:

Private Sub Explorer_NavigateComplete2(ByVal pDisp As Object, _
		ByRef URL As Object) Handles Explorer.NavigateComplete2
	ComboBox1.Items.Add(Explorer.LocationURL)
End Sub

Событие NavigateComplete2 возникает, когда объект Internet Explorer успешно загружает в браузер указанный документ - некорректная веб-страница или URL не сгенерируют этого события. В результате наблюдение за событием NavigateComplete2 является удобным способом отслеживания недавно загруженных веб-документов. Если вы используете свойство LocationURL объекта Explorer, то можете создать собственный список истории документов HTML. В этом примере я просто добавляю посещенный URL в комбинированный список в форме, так что вы можете легко посетить этот сайт снова, сделав всего один щелчок мышью. Однако вы также можете сохранять эту информацию, записывая этот URL в файл или в базу данных.

Когда закончите, закройте окна Internet Explorer, которые вы открыли. Затем щелкните на кнопке Закрыть в строке заголовка приложения Show HTML.