Объект Window представляет собой окно браузера и является начальным (корневым) объектом модели Internet Explorer.
Свойства
DefaultStatus ‑ умалчиваемое значение строки состояния браузера.
Document ‑ ссылка на объект Document в текущем окне.
Self, Status ‑ ссылка на текущее окно, на строку состояния.
Frames ‑ ссылка (имя фрейма или его номер) к массиву фреймов текущего окна.
Name, Parent ‑ имя окна, ссылка на родительский объект.
Top ‑ ссылка к самому верхнему в иерархии объекту Window.
DialogTop, DialogLeft, DialogHeight, DialogWidth ‑ позиция левого верхнего угла, высота и ширина окна, созданного методом ShowModalDialog в пикселях.
Методы
Alert <строка сообщения> ‑ вывод сообщения с кнопкой OK
<переменная>=Confirm
<переменная>=Prompt
Window. Focus/ Window. Blur ‑
Window. Open
Window. Close
Window. Scroll
<переменная>=Window.ShowModalDialog
X=Window. SetTimeOut
Window. ClearTimeOut
Window. Navigator
Window. ExecScript
Window. ShowHelp
События
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>
