Объектная модель Internet Explorer
Методы объекта Window
Alert
Метод Alert выводит на экран сообщение с заданным текстом Пример
Код для примера
<script language="vbscript">
sub AlertShow()
alert "Ну, заяц, погоди!"
end sub
</script>
Close
Метод Close закрывает текущую страницу Пример
Код для примера
<script language="vbscript">
sub CloseShow()
window.close
end sub
</script>
Confirm
Метод Confirm выводит на экран диалоговое окно с заданным текстом запроса и кнопками OK и Отмена. Если будет нажата кнопка OK, то возвращается True (-1), если Отмена, то возвращается False (0) Пример
Код для примера
<script language="vbscript">
sub ConfirmShow()
Dim retval
retval = confirm ("Удалить этот справочник?")
If retval Then
alert "Подумай еще раз! Пожалеешь!"
Else
alert "Спасибо! Я тебе еще пригожусь!"
End If
end sub
</script>
MoveTo
Метод moveTo перемещает верхний левый угол окна на экране в заданную позицию
Синтаксис
window.moveTo(iX, iY)
Параметры
iX
Требуется. Координата, определяющая смещение окна по горизонтали
iY
Требуется. Координата, определяющая смещение окна по вертикали
Пример
Переместим окно (верхний левый угол) центр экрана
function MoveMe()
{
window.moveTo (screen.width/2,screen.height/2);
}
</script>
Navigate
Метод Navigate позволяет переместиться на заданную страницу Пример
Код для примера
<script language="vbscript">
sub NavigateShow()
window.Navigate "index.htm"
end sub
</script>
Open
Метод Open открывает новое окно браузера с указанным адресом. Кроме указанного адреса, вы должны указать имя окна, а также можете использовать необязательные параметры для настройки внешнего вида открываемого окна
toolbar
boolean
Панель инструментов
location
boolean
Адресная строка
directories
boolean
Ссылки
status
boolean
Строка состояния
menubar
boolean
Меню
scrollbars
boolean
Полосы прокрутки, если документ больше окна
resizable
boolean
Возможность изменения размеров окна
width
integer
Ширина окна в пикселах
height
integer
Высота окна в пикселах
top
integer
Верхняя позиция окна в пикселах
left
integer
Левая позиция окна в пикселах
Пример
Откроем новое окно без панели инструментов, с меню и высотой окна в 100 пикселов
Код для примера
<script language="vbscript">
sub OpenShow()
window.Open "close.htm", "myTest", "toolbar=no, menubar=yes height=100"
end sub
</script>
Prompt
Метод Prompt выводит на экран диалоговое окно со строкой для ввода. Имеет два параметра. В первом обязательном параметре вы задаете текст запроса. Во втором необязательном параметре вы можете установить текст, выводимый в текстовом поле. Если вы не установили текст, то там выводится <undefined> Пример
Код для примера
<script language="vbscript">
sub PromptShow()
Dim retval
retval = prompt ("Как тебя зовут?","заяц")
alert "Ну, " & retval & ", погоди!"
end sub
</script>
ResizeTo
Метод resizeTo устанавливает размер окна до заданных величин
Синтаксис
window.resizeTo(iWidth, iHeight)
Параметры
iWidth
Требуется. Величина в пикселах, определяющая ширину окна
iHeigh
Требуется. Величина в пикселах, определяющая высоту окна
Пример
Установим размер окна в половину экрана
Код дляя примера:
<button onclick="MoveMe()">Меняем размер </button>
<script>
function MoveMe()
{
window.resizeTo (screen.width/2,screen.height/2);
}
</script>
ScrollBy
Метод scrollBy производит скроллинг окна на экране на заданную величину относительно текущей позиции ползунка
Синтаксис
window.scrollBy(iX, iY)
Параметры
iX
Требуется. Координата, определяющая горизонтальный скроллинг в пикселах. Положительные значения скроллируют окно вправо, отрицательные - влево
iY
Требуется. Координата, определяющая вертикальный скроллинг в пикселах. Положительные значения скроллируют окно вниз, отрицательные - вверх
Код для примера:
<a href="" onClick="scrollBy(0,-10); return false;">Вверх</a>
SetInterval
Метод SetInterval повторяет заданную операцию через заданное число миллисекунд Пример
Пример HTML-часов
Код для примера
<script language="vbscript">
sub PauseSec()
ID = Window.setinterval("TimerFunc",1000, "vbscript")
end sub
sub TimerFunc()
mysample.innerText=time
end sub
</script>
SetTimeOut
Метод SetTimeOut включает таймер для вызова определенной функции через заданное число миллисекунд Пример
Данный текст изменится через 3 секунды после нажатия на кнопку
Код для примера
<script language="vbscript">
sub PauseSec()
ID = Window.setTimeout("TimerFunc",3000, "vbscript")
end sub
sub TimerFunc()
mysample.innerText="Изменим Окна к лучшему"
end sub
</script>
Примечание: 2 последних примера почему-то не работяют. Если кто знает почему напишите, исправлю.
