Home.csp

To download the CSP files from this tutorial, click TutorialSamples_vb.zip. For more information about using the samples, see Code examples.


<HTML>

<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=charset=UTF-8">

<FRAMESET Rows="64,*">

  

<%


  Dim CurrentFolderID

  CurrentFolderID = Request.QueryString("FolderID")

    

  'Load the top frame with menu.csp so that it can display the

  'full path to the current folder.

  Response.Write "<FRAME Name=""Header"" Target=""Contents"" " & _

             "Src=""Menu.csp?FolderID=" & CurrentFolderID &" "">"

  Response.Write "<FRAMESET Cols=""180,*"">"


  'Load the folders portion of the page so that it can display

  'a list of sub-folders within the current folder.

  Response.Write "<FRAME Name=""Contents"" Target=""main"" " & _

         "Src=""folders.csp?FolderID=" & CurrentFolderID & """>"


  'Load the reports portion of the page so that it can display

  'a list of the reports contained within the current folder.

  Response.Write "<FRAME Name=""Main""  Target=""main""" & _

         "Src=""reports.csp?FolderID=" & CurrentFolderID & """>"


%>

  </FRAMESET>

  <BODY>

  </BODY>

</FRAMESET>

</HTML>



Remarks

Note that the source of the frame named Contents points to your Folders.csp file with the FolderID equal to the CurrentFolderID.

Response.Write "<frame name=""Contents"" target=""main"" " & _

        "src=""Folders.csp?FolderID=" & CurrentFolderID & """>"

Also recall that earlier in the tutorial, in the section Redirecting the user to the site's home page, the Logon.csp page redirects the user to Home.csp, and that a particular line was unusual in that it included a question mark.

Response.Redirect "home.csp?FolderID=0"

The line loads the frames file with the parameter FolderID equal to zero. This ensures that when the page is first loaded, both the folders page and the reports page will load the folders and reports at the very top level of the folder tree.

Go to next step:

Saving and viewing the Tutorial Desktop



Crystal Decisions, Inc.
http://www.crystaldecisions.com
Support services:
http://support.crystaldecisions.com