Основы создания сценариев, знакомство с VBScript

Объект 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>



Содержание раздела