Объект Location
Данный объект хранит информацию о текущем URL.
Href. Данное свойство определяет текущий URL.
Рассмотрим пример окна в виде двух фреймов. В этом примере задача сводятся к тому, чтобы при щелчке по кнопке содержимое фреймов менялось местами. То есть содержимое верхнего фрейма помещалось в нижний и наоборот и т. д. (рис.9).
Для определения того, какой документ должен отображаться в том или ином фрейме, использована несложная составная строковая функция, приведенная ниже.
Left(Right(Top.Frames(0).Location.Href,5),1)="1"
Строка Top.Frames(0).Location.Href вернет строку текущего URL. Функция Right в приведенном примере вырезает строку из пяти символов справа: ''N.htm”? где N - последняя цифра имени файла ("1" или "2" в зависимости от того, какой документ загружен- Frame1.htm или Frame2.htm).
Пример 18. Установочный Index.htm
<HTML>
<HEAD>
<TITLE>Example</TITLE>
</HEAD>
<FRAMESET Rows=50%,50%>
<FRAME NAME="TopFrame" SRC="Frame1.htm">
<FRAME NAME="BottomFrame" SRC="Frame2.htm">
![]() |
</FRAMESET>
</HTML>
Рис. 9. Применения объекта Frame и Location
Пример 21. Frame1.htm
<html>
<HEAD>
<TITLE>Top Frame</TITLE>
</HEAD>
<BODY BGCOLOR="white">
<SCRIPT LANGUAGE="VBScript">
Sub TestB_OnClick
If Left(Right(Top.Frames(0).Location.Href,5),1)="1" Then
Top.BottomFrame.Location.Href ="Frame1.htm"
Top.TopFrame.Location.Href = "Frame2.htm"
Else
Top.BottomFrame.Location.Href ="Frame2.htm"
Top.TopFrame.Location.Href ="Frame1.htm"
End If
End Sub
</SCRIPT>
<P ALIGN="center"> <FONT COLOR="Blue" SIZE="4"><STRONG>
Top Frame
</STRONG></FONT>
</p>
<FORM>
<P ALIGN="center">
<INPUT TYPE="button" NAME="TestB"
VALUE="Нажмите кнопку для перемещения фреймов">
</p>
</FORM> </BODY> </HTML>
Пример19. Frame2.htm
<html>
<HEAD>
<TITLE>Bottom Frame</TITLE> </HEAD>
<BODY BGCOLOR="white">
<P align="center">
<Font color="Blue" Size="6"><Strorig>
Bottom Frame</Strong><font>
</p>
</BODY>
</HTML>