HOWTO: How To Maintain State Across Pages with VBScript

This article was previously published under Q157906
This article has been archived. It is offered "as is" and will no longer be updated.
1.00 1.10 2.00WINDOWSkbprg kbhowto
SUMMARY
This article illustrates the three ways that you can maintain state acrossWeb pages using Visual Basic Scripting Edition.

Following are the three methods:
  • Assign a cookie to an alternate HREF.
  • Use a cookie and change the contents of the page.
  • Use frames and store a value in the top level frame.
MORE INFORMATION
The three methods are described in more detail below. To view an examplethat demonstrates the three methods, create the HTML files that aredescribed in each section. You can use Notepad or any other text editor tocreate the files.

Method 1 - Assigning a Cookie to an Alternate HREF

To use method 1, you need to read your files from an HTTP server.
   ******** Begin Page1-1.htm **********   <HTML>    <SCRIPT LANGUAGE="VBSCRIPT">      Sub SetCookie        document.cookie = "MyVar='101'; path='page1-2.htm'"      End Sub    </SCRIPT>    <BODY>      <H2>Page 1 - Method 1</H2><HR>      <INPUT TYPE=BUTTON VALUE="Set Cookie" onClick="SetCookie">      <A HREF="page1-2.htm">Go to Page 2</A>    </BODY>   </HTML>   ******** End Page1-1.htm **********   ******** Begin Page1-2.htm **********   <HTML>    <SCRIPT LANGUAGE="VBSCRIPT">      Sub GetCookie        MsgBox document.cookie      End Sub    </SCRIPT>    <BODY>      <H2>Page 2 - Method 1</H2><HR>      <INPUT TYPE=BUTTON VALUE="Get Cookie" onClick="GetCookie">    </BODY>   </HTML>   ******** End Page1-2.htm   **********				
Page1-1.htm:
  • The onClick event of the button calls the SetCookie subroutine that is defined at the top of the page.
  • The subroutine sets the value of the cookie and the PATH of the cookie. The PATH is the name of the page that the value is set for.
  • The anchor "Go to Page 2" navigates to page 2 using standard HTML syntax.
Page1-2.htm:

  • The onClick event of the button calls the GetCookie subroutine that is defined at the top of the page.
  • The subroutine reads the value of the cookie to demonstrate that the variable has been set.

Method 2 - Using a Cookie and Changing the Contents of the Page

To use method 2 you need to read your files from an HTTP server.
   ******** Begin Page2-1.htm **********   <HTML>    <SCRIPT LANGUAGE="VBSCRIPT">      Sub SetCookie        document.cookie = "MyVar=101"      End Sub      Sub GotoNextPage        location.href = "page2-2.htm"      End Sub    </SCRIPT>    <BODY>      <H2>Page 1 - Method 2</H2><HR>      <INPUT TYPE=BUTTON VALUE="Set Cookie" onClick="SetCookie">      <A HREF="" onClick="GotoNextPage">Go to Page 2</A>    </BODY>   </HTML>   ******** End Page2-1.htm **********   ******** Begin Page2-2.htm **********   <HTML>    <SCRIPT LANGUAGE="VBSCRIPT">      Sub GetCookie        MsgBox document.cookie      End Sub    </SCRIPT>    <BODY>      <H2>Page 2 - Method 2</H2><HR>      <INPUT TYPE=BUTTON VALUE="Get Cookie" onClick="GetCookie">    </BODY>   </HTML>   ******** End Page2-2.htm **********				
Page2-1.htm:

  • The onClick event of the button calls the SetCookie subroutine that is defined at the top of the file.
  • The subroutine sets the value of the cookie for the current page.
  • The anchor "Go to Page 2" calls the GotoNextPage subroutine that is defined at the top of the page.
  • The GotoNextPage subroutine navigates to Page 2 by setting the HREF property of the location object. This changes what the current page is pointing to without resetting the cookie.
Page2-2.htm:

  • The onClick event of the button calls the GetCookie subroutine that is defined at the top of the page.
  • The subroutine reads the value of the cookie to demonstrate that the variable has been set.

Method 3 - Using Frames and Storing a Value in the Top Level Frame

   ******** Begin Page3-1.htm **********   <HTML>    <SCRIPT LANGUAGE="VBSCRIPT">      Dim MyVar    </SCRIPT>    <FRAMESET COLS="50%,50%">      <FRAME SRC="page3-2.htm">      <FRAME SRC="page3-3.htm">    </FRAMESET>   </HTML>   ******** End Page3-1.htm **********   ******** Begin Page3-2.htm **********   <HTML>    <SCRIPT LANGUAGE="VBSCRIPT">      Sub SetVariable        top.MyVar = 101      End Sub    </SCRIPT>    <BODY>      <H2>Page 1 - Method 3</H2><HR>      <INPUT TYPE=BUTTON VALUE="Set Variable" onClick="SetVariable">    </BODY>   </HTML>   ******** End PAGE3-2.HTM **********   ******** Begin Page3-3.htm **********   <HTML>    <SCRIPT LANGUAGE="VBSCRIPT">      Sub GetVariable        MsgBox top.MyVar      End Sub    </SCRIPT>    <BODY>      <H2>Page 2 - Method 3</H2><HR>      <INPUT TYPE=BUTTON VALUE="Get Variable" onClick="GetVariable">    </BODY>   </HTML>   ******** End Page3-3.htm **********				
Page3-1.htm:

  • A variable is defined. Since the variable is defined outside of any subroutines, it is accessible to all child frames.
Page3-2.htm:

  • The onClick event of the button calls the SetVariable subroutine that is defined at the top of the file.
  • The subroutine sets the value of the variable in the top-most frame. It does this using the variable TOP, which refers to the top-level frame.
Page3-3.htm:

  • The onClick event of the button calls the GetVariable subroutine that is defined at the top of the page.
  • The subroutine reads the value of the variable in the top-most frame.
REFERENCES
For more information about developing Web-based solutions for Microsoft Internet Explorer, visit the following Microsoft Web sites:
1.00 kbDSI
Properties

Article ID: 157906 - Last Review: 01/11/2015 01:13:22 - Revision: 3.0

Microsoft Visual Basic, Scripting Edition 2.0, Microsoft Visual Basic, Scripting Edition 1.1

  • kbnosurvey kbarchive kbfaq kbhowto kbscript KB157906
Feedback