?
Solved

Get Session Value from VBScript

Posted on 2000-02-22
3
Medium Priority
?
916 Views
Last Modified: 2011-09-20
I have two web pages. The first one is the web page where I store the values in session using ASP.
The second page is the web page where I want to retrieve the session values I stored in first page using VBSCRIPT.
How to do this?

* This is the first program:
<HTML>
<HEAD>
  <TITLE>Product Sales Inquiry</TITLE>
</HEAD>
<BODY>
  <TABLE cellpadding="0" cellspacing="2" border="0" WIDTH="100%">
<TR>
  <TD>
   <!-- This for Call the Second Web Page -->
          <A HREF="grp_product_sales.asp" CLASS="ClsTable">View Graphics</A>
              </td>
      </tr>            
  </TABLE>
<%
   Session("month01") = 1
   Session("month02") = 2
   Session("month03") = 3
   Session("month04") = 4
   Session("month05") = 5
   Session("month06") = 6
   Session("month07") = 7
   Session("month08") = 8
   Session("month09") = 9
   Session("month10") = 10
   Session("month11") = 11
   Session("month12") = 12      
%>  
</BODY>
</HTML>

* This is the second program:
<HTML>
<HEAD>
  <TITLE>Graph for Product Sales</TITLE>
  <LINK REL=STYLESHEET HREF="stylesheet/ste1.css" TYPE="text/css">
</HEAD>

<SCRIPT LANGUAGE="VBScript">
    SUB FillChart
      With TChart1
       ' ---------- Setting up Header ----------      
       .Header.Text.Clear
       .Header.Text.Add "Product Sales Analysis Chart"      
       .Header.Text.Add "2000"
       .Header.Font.Name = "Verdana"
       .Header.Font.Size = 12
       .Header.Font.Bold = True
       .Header.Font.Color= vbYellow
       
       with .Panel.Gradient
         .Visible = True
         .StartColor = vbWhite
         .EndColor = vbBlue
         .Direction = gdLeftRight      
       end with
             
       .Environment.IEPrintWithPage=True
       
       ' ---------- Setting up Graphics Type ----------
       .AddSeries( 1 )
       
       ' ---------- Setting up Graphics Content ----------

' *** I CAN'T GET SESSION VALUES ***
       .Series(0).Clear                      
       .Series(0).Add <%=Session(month01)%>, "January", RGB(255,0,0)
       .Series(0).Add <%=Session(month02)%>, "February", RGB(0,255,0)
       .Series(0).Add <%=Session(month03)%>, "March", RGB(255,255,0)
       .Series(0).Add <%=Session(month04)%>, "April", RGB(255,0,0)
       .Series(0).Add <%=Session(month05)%>, "May", RGB(0,255,0)
       .Series(0).Add <%=Session(month06)%>, "June", RGB(255,255,0)
       .Series(0).Add <%=Session(month07)%>, "July", RGB(255,0,0)
       .Series(0).Add <%=Session(month08)%>, "August", RGB(0,255,0)
       .Series(0).Add <%=Session(month09)%>, "September", RGB(255,255,0)
       .Series(0).Add <%=Session(month10)%>, "October", RGB(255,0,0)
       .Series(0).Add <%=Session(month11)%>, "November", RGB(0,255,0)
       .Series(0).Add <%=Session(month12)%>, "December", RGB(255,255,0)                
      End With
    END SUB
   
 

   
</SCRIPT>

<BODY OnLoad="FillChart">
  <CENTER>
  <!-------------------- OBJECT DECLARATION -------------------->
  <OBJECT
        classid="clsid:008BBE7E-C096-11D0-B4E3-00A0C901D681"
        id=TChart1
        TYPE="application/x-oleobject"
        width=600
        height=300
        align=center
        hspace=0
        vspace=0
  >
  </OBJECT>
  <BR><BR>
 
  <FORM Name="form1">
    <INPUT TYPE=hidden NAME=txtMonth01 VALUE=<%=Session(month01)%>>
    <INPUT TYPE=hidden NAME=txtMonth02 VALUE=<%=Session(month02)%>>
    <INPUT TYPE=hidden NAME=txtMonth03 VALUE=<%=Session(month03)%>>
    <INPUT TYPE=hidden NAME=txtMonth04 VALUE=<%=Session(month04)%>>
    <INPUT TYPE=hidden NAME=txtMonth05 VALUE=<%=Session(month05)%>>
    <INPUT TYPE=hidden NAME=txtMonth06 VALUE=<%=Session(month06)%>>
    <INPUT TYPE=hidden NAME=txtMonth07 VALUE=<%=Session(month07)%>>
    <INPUT TYPE=hidden NAME=txtMonth08 VALUE=<%=Session(month08)%>>
    <INPUT TYPE=hidden NAME=txtMonth09 VALUE=<%=Session(month09)%>>
    <INPUT TYPE=hidden NAME=txtMonth10 VALUE=<%=Session(month10)%>>
    <INPUT TYPE=hidden NAME=txtMonth11 VALUE=<%=Session(month11)%>>
    <INPUT TYPE=hidden NAME=txtMonth12 VALUE=<%=Session(month12)%>>
  </FORM>
 
  <A HREF="Javascript:history.go(-1)" CLASS=ClsTable>Back</A>
  </CENTER>
</BODY>
</HTML>


Need experts help for this...

Daniel
0
Comment
Question by:daniel_c
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
3 Comments
 
LVL 8

Accepted Solution

by:
xabi earned 120 total points
ID: 2549385
You must use double quotes in your second page:

Change:

<INPUT TYPE=hidden NAME=txtMonth01 VALUE=<%=Session(month01)%>>

into:

<INPUT TYPE=hidden NAME=txtMonth01 VALUE=<%=Session("month01")%>>

and so on

xabi
0
 
LVL 7

Author Comment

by:daniel_c
ID: 2549467
Great Xabi!!!
See how careless I was... ;-)
0
 
LVL 8

Expert Comment

by:xabi
ID: 2549540
Nice to help you.

xabi

PS: Points?
0

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I have helped a lot of people on EE with their coding sources and have enjoyed near about every minute of it. Sometimes it can get a little tedious but it is always a challenge and the one thing that I always say is:   The Exchange of informatio…
This demonstration started out as a follow up to some recently posted questions on the subject of logging in: http://www.experts-exchange.com/Programming/Languages/Scripting/JavaScript/Q_28634665.html and http://www.experts-exchange.com/Programming/…
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…
In this video, Percona Solution Engineer Dimitri Vanoverbeke discusses why you want to use at least three nodes in a database cluster. To discuss how Percona Consulting can help with your design and architecture needs for your database and infras…

765 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question