Файловый архив студентов. Файловый архив студентов.
1261 вуз, 4614 предмет.
/ Регистрация
FAQ Обратная связь Вопросы и предложения
Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Уральский государственный экономический университет
Предмет:
[НЕСОРТИРОВАННОЕ]
Файл:
Плещёв ИП 2010-04-04 doc.doc
Скачиваний:
108
Добавлен:
13.05.2015
Размер:
5.96 Mб
Скачать
☆
►Содержание►

15.6. Управление броузером

InternetExplorerявляется иерархической моделью из многих объек­тов, которыми можно оперировать при помощиVBScript, используя их свойства, методы и события. Рассмотрим основные объекты.

15.6.1. ОбъектWindow

Объект Windowпредставляет собой окно броузера и является начальным (корневым) объектом моделиInternetExplorer.

Свойства

DefaultStatus‑ умалчиваемое значение строки состояния броузера.

Document‑ ссылка на объектDocumentв текущем окне.

Self, Status‑ ссылка на текущее окно, на строку состояния.

Frames‑ ссылка (имя фрейма или его номер) к массиву фреймов текущего окна.

Name, Parent‑ имя окна, ссылка на родительский объект.

Top­ ‑ ссылка к самому верхнему в иерархии объектуWindow.

DialogTop, DialogLeft, DialogHeight, DialogWidth‑ позиция левого верхне­го угла, высота и ширина окна, созданного методомShowModalDialogв пикселях.

Методы

Alert<строка сообщения> ‑ вывод сообщения с кнопкойOK.

<переменная>=Confirm<строка сообщения> ‑ вывод сообщения с кноп­ка­миOK,Cancel. ВозвращаетTrue/Falseпосле надажия клавишиOK/Cancel.

<переменная>=Prompt(<строка сообщения>,<умалчиваемое значение>) - зап­рос на ввод.

Window.Focus/Window.Blur ‑ получение/потеря фокуса.

Window.Open(URL,<имя нового окна>,<параметры>) ‑ открытие стра­ни­цы с адресомURLв новом окне. Параметры задают список ключевых пара­мет­ров:Directories=Yes(вывод панелиLinks),Height/Width(высо­та/ши­рина окна),Location=Yes(наличие панели адресов),Menubar=Yes(наличие меню),Resizable=Yes(возможность изменения размеров окна),Scrollbars=Yes(наличие полосы прокрутки),Status=Yes(отобразить строку состояния),ToolBar=Yes(отобразить панель инструментов).

Window.Close‑ закрытие окна.

Window.Scroll=”Yes/No” ‑ показывает/скрывает полосу прокрутки.

<переменная>=Window.ShowModalDialog(URL[,<аргументы>[,<возможно­сти>]]) ‑ выводит диалоговоеHTML‑окно.

X=Window.SetTimeOut<имя процедуры>, <интервал> ‑ задает имя процедуры, вы­пол­няемой один раз через временной интервал (в миллисекундах). Пере­меннаяXиспользуется для отключения таймера методомClearTimeOut.

Window.ClearTimeOutX‑ отключение таймера.

Window.NavigatorURL- загрузка новой страницы по адресуURL.

Window.ExecScript(<процедура>[,<язык процедуры>]) ‑ запуск процедуры.

Window.ShowHelp(URL[,<аргументы>]) ‑ выводит файл справки.

События

OnLoad/OnUnLoad‑ после загрузки/выгрузки документа.

OnFocus/OnBlur‑ при получении/потере фокуса.

OnHelp‑ после нажатия клавишиF1, когда окно находится в фокусе.

Cобы­тие реализуется в про­це­дуре:Window_<имя события>.

Примериспользования методовConfirmиAlert.

<HTML>

<HEAD> <TITLE> Метод Confirm</TITLE>

<SCRIPT LANGUAGE=“VBSCRIPT“>

Sub Knopka_OnClick

if Confirm(“Выберите кнопку!“) then Alert“OK“ Else Alert “Cancel“

End Sub

</SCRIPT>

</HEAD>

<BODY BGCOLOR=“#FFFFFF“>

<P ALIGN=“CENTER“>

<FONT COLOR=“Green“ SIZE'“4“> Метод </FONT>

<FONT COLOR=“Green“ SIZE=“5“>

<EM><B>Confirm</B></EM></FONT> </P>

<FORM METHOD=“POST“>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“ VALUE=“Тестирование метода Confirm“> </P>

</FORM>

</BODY>

</HTML>

Примериспользования методаPrompt.

<HTML>

<HEAD> <TITLE>Пример использования метода Prompt</TITLE>

<SCRIPT LANGUAGE=“VBScript“>

Sub Knopka_OnClick: Alert Prompt(“Введите текст“,“текст“): End Sub

</SCRIPT>

</HEAD>

<BODY BGCOLOR=“WHITE“>

<P ALIGN=“CENTER“>

<FONT COLOR=“Red“ SIZE=“4“>Метод Prompt</FONT> </P>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“ VALUE=“Тестирование метода Prompt“> </P>

</BODY>

</HTML>

Примерзагрузки новой страницы в отдельное окно методомOpen.

<HTML> <HEAD> <TITLE>Пример использования методаOpen</TITLE>

<SCRIPT LANGUAGE=“VBScript“>

Sub Knopka_OnClick

Options=“Toolbar=Yes, Location=Yes, Directories=Yes, Status=Yes,“ + _

“menubar=Yes, scrollbars=No, resizable=Yes, width=300, height=400“

Window.Open “http://www.usue.ru“, “usue“,Options

End Sub

</SCRIPT> </HEAD>

<BODY BGCOLOR=“WHITE“>

<P ALIGN=“CENTER“>

<FONT COLOR=“Red“ SIZE=“4“> Метод Open</FONT> </P>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“VALUE=“Для открытия окна нажмите кнопку“></P>

</BODY>

</HTML>

Примериспользования методаClose.

<HEAD> <TITLE>Пример использования методаClose</TITLE>

<SCRIPT LANGUAGE=“VBScript“>

Sub Knopka_OnClick: Window.Close: End Sub

</SCRIPT> </HEAD>

<BODY>

<P ALIGN=“CENTER“> <FONT SIZE=“4“>Метод Close</FONT></P>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“ VALUE=“Для закрытия окна нажмите кнопку“> /P>

</BODY>

</HTML>

Примерработы с таймером. Если кнопка нажата в течение одной се­кун­ды, то появляется сообщение “Кнопка нажата”, иначе ‑ “Нажмите кнопку”.

<HTML><HEAD><TITLE>Пример работы с таймером</TITLE>

<SCRIPT LANGUAGE=“VBScript“>

x=SetTimeout(“Alert('Нажмите кнопку!')“,1000)

Sub Knopka_OnClick: ClearTimeout x:Alert “Кнопка нажата“: End Sub

</SCRIPT> </HEAD>

<BODY> <P ALIGN=“CENTER“> Метод SetTimeout </P>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“ VALUE=“Нажмите кнопку“> </P> </BODY>

</HTML>

Примерзагрузки новой страницы методомNavigtor.

<HTML> <HEAD> <TITLE> Загрузка новой траницы</TITLE>

<SCRIPT LANGUAGE=“VBScript“>

Sub Knopka_OnClick

Navigate Prompt(“Введите URL адрес “,“http://www.usue.ru“)

End Sub

</SCRIPT> </HEAD>

<BODY> <P ALIGN=“CENTER“>Метод Navigator</FONT> </P>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“VALUE=“Новая Web-страница“></P> </BODY>

</HTML>

ПримерпроцедурыWindow_OnLoadобработки событияOnLoad.

<HTML> <HEAD> <TITLE>Пример события OnLoad</TITLE>

<SCRIPT LANGUAGE=“VBScript“>

Sub Window_OnLoad: Alert “Нажмите на кнопку выбора“: End Sub

Sub Knopka_OnClick

If Confirm (“Выберите кнопку“) Then Alert “OK“ Else Alert “Cancel“

End Sub

</SCRIPT> </HEAD>

<BODY> <P ALIGN=“CENTER“>Событие OnLoad</P>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“ VALUE=“Кнопка выбора“> </P> </BODY>

</HTML>

Событие OnLoadможно описать в теге <BODY> при помощи атрибутаOnLoad=”<имя процедуры>”.

Примервызова процедуры обработки событияOnLoadв тегеBody.

<HTML> <HEAD><TITLE>Событие OnLoad в теге BODY</TITLE>

<SCRIPT LANGUAGE=“VBScript“>

Sub ProcLoad: Alert “Нажмите на кнопку выбора“:End Sub

Sub Knopka_OnClick

If Confirm (“Выберите кнопку“) Then Alert “OK“ Else Alert “Cancel“

End Sub

</SCRIPT>

</HEAD>

<BODY OnLoad=“ProcLoad“>

<P ALIGN=“CENTER“>Событие OnLoad</P>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“ VALUE=“Кнопка выбора“> </P> </BODY>

</HTML>

Примерпроцедуры обработки событияOnUnLoad.

<HTML> <HEAD><TITLE>Событие OnUnLoad в теге BODY</TITLE>

<SCRIPT LANGUAGE=“VBScript“>

Sub Window_OnUnLoad: Alert “До свидания“ : End Sub

Sub Knopka_OnClick: Window.Close : End Sub

</SCRIPT>

</HEAD>

<BODY><P ALIGN=“CENTER“>Событие OnUnLoad</P>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“ VALUE=“Выход“> </P> </BODY>

</HTML>

Примервызова процедуры событияOnUnLoadв тегеBody.

<HTML> <HEAD><TITLE>Событие OnUnLoad в теге BODY</TITLE>

<SCRIPT LANGUAGE=“VBScript“>

Sub ProcLoad: Alert “До свидания“ : End Sub

Sub Knopka_OnClick: Window.Close : End Sub

</SCRIPT> </HEAD>

<BODY ONUNLOAD=“ProcLoad“>

<P ALIGN=“CENTER“>Событие OnUnLoad</P>

<P ALIGN=“CENTER“><INPUT TYPE=“BUTTON“

NAME=“Knopka“ VALUE=“Выход“> </P> </BODY>

</HTML>

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]
Помощь Обратная связь Вопросы и предложения Пользовательское соглашение Политика конфиденциальности