Проектирование документов ActiveX

Как вы узнали из урока 17, с помощью документов ActiveX вы сможете распространить возможности Visual Basic на Интернет или вашу интрасеть. Документы ActiveX представляют собой приложения Visual Basic, в которых функции контейнера выполняет Microsoft Internet Explorer 3 (или более новая версия). Используя документы ActiveX в своих проектах, вы сможете создавать переносимые варианты приложений и работать с ними на портативных компьютерах, в дальних офисах и даже из дома. Приложение работает прямо из Web-броузера. Тем не менее, документ ActiveX не является Web-страницей — это вполне самостоятельное приложение. Кроме того, пользователи могут свободно переключаться между документами ActiveX и Web-страницами в броузере.

Чтобы наглядно продемонстрировать, как это происходит, мы продолжим работу над приложением WebComm и создадим клиента WebComm в виде документа ActiveX (вместо стандартного ЕХЕ-файла):

1. Создайте новый проект командой File > New Project.

2. В диалоговом окне New Project выберите значок ActiveX Document EXE.

3. Задайте свойству Name проекта значение WebCommClient.

4. Откройте диалоговое окно свойств проекта — для этого щелкните правой кнопкой мыши на имени проекта в окне проекта и выполните команду WebCommServer properties из контекстного меню.

5. Перейдите на вкладку Make и введите в поле Title строку Клиент WebComm.

6. Закройте диалоговое окно кнопкой ОК.

7. Задайте свойству Name документа UserDocumentl значение docWebComm.

8. Щелкните правой кнопкой мыши на панели элементов и выполните команду Components из контекстного меню.

9. Установите флажки рядом со строкой Microsoft Winsock Control 6.0. Закройте диалоговое окно кнопкой ОК — элемент Winsock появляется на панели.

10. Добавьте элемент Winsock в docWebComm и задайте его свойству Name значение wsk.

11. Создайте элемент-надпись (Label) в левой верхней части документа. Задайте его свойству Name значение lblName, а свойству Caption — значение Введите имя:.

12. Создайте под надписью текстовое поле. Задайте его свойству Name значение txtName. Удалите текущее содержимое свойства Text.