Help and Support
 

powered byLive Search

HOWTO: How To Maintain State Across Pages with VBScript

Article ID:157906
Last Review:May 11, 2006
Revision:3.0
This article was previously published under Q157906
1.00 1.10 2.00 WINDOWS kbprg kbhowto
On This Page

SUMMARY

This article illustrates the three ways that you can maintain state across Web 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.

Back to the top

MORE INFORMATION

The three methods are described in more detail below. To view an example that demonstrates the three methods, create the HTML files that are described in each section. You can use Notepad or any other text editor to create the files.

Back to the top

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.

Back to the top

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.

Back to the top

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.

Back to the top

REFERENCES

For more information about developing Web-based solutions for Microsoft Internet Explorer, visit the following Microsoft Web sites:
http://msdn.microsoft.com/ie/ (http://msdn.microsoft.com/ie/)

http://support.microsoft.com/iep (http://support.microsoft.com/iep)

Back to the top


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

Back to the top

Keywords: 
kbfaq kbhowto kbscript KB157906

Back to the top

Article Translations

 

Other Support Options

  • Need More Help?
    Contact a Support professional by Email, Online or Phone.
  • Customer Service
    For non-technical assistance with product purchases, subscriptions, online services, events, training courses, corporate sales, piracy issues, and more.
  • Newsgroups
    Pose a question to other users. Discussion groups and Forums about specific Microsoft products, technologies, and services.