//
// Copyright (c) 2006 by Conor O'Mahony.
// For enquiries, please email GubuSoft@GubuSoft.com.
// Please keep all copyright notices below.
// Original author of TreeView script is Marcelino Martins.
//
// This document includes the TreeView script.
// The TreeView script can be found at http://www.TreeView.net.
// The script is Copyright (c) 2006 by Conor O'Mahony.
//
// You can find general instructions for this file at www.treeview.net.
//

USETEXTLINKS = 1
STARTALLOPEN = 1
USEFRAMES = 0
USEICONS = 0
WRAPTEXT = 1
PRESERVESTATE = 1

//
// The following code constructs the tree.  This code produces a tree that looks like:
// 
// Tree Options
//  - Expand for example with pics and flags
//    - United States
//      - Boston
//      - Tiny pic of New York City
//      - Washington
//    - Europe
//      - London
//      - Lisbon
//  - Types of node
//    - Expandable with link
//      - London
//    - Expandable without link
//      - NYC
//    - Opens in new window
//
foldersTree = gFld("Home", "index1.asp")
  foldersTree.treeID = "Frameless"

  aux1 = insFld(foldersTree, gFld("About AIMED ", "javascript:undefined"))
      insDoc(aux1, gLnk("S", "About Us", "aboutus.html"))
      insDoc(aux1, gLnk("S", "Member Registration", "userlogin.asp?type=MBR100"))
      insDoc(aux1, gLnk("S", "Members Directory", "userlogin.asp?type=VMBR100"))
	  insDoc(aux1, gLnk("S", "Regulatory & Commercial Documents", "userlogin.asp?type=HRCD100"))
	  insDoc(aux1, gLnk("S", "Events & Activities", "userlogin.asp?type=EA100"))
	  insDoc(aux1, gLnk("S", "Press Release", "userlogin.asp?type=PR100"))
	  insDoc(aux1, gLnk("S", "Useful links", "userlogin.asp?type=UL100"))
	  insDoc(aux1, gLnk("S", "Contact Us", "contactus.html"))
	  
  aux2 = insFld(foldersTree, gFld("About IMDRRG", "javascript:undefined"))
      insDoc(aux2, gLnk("S", "About Us", "aboutus1.html"))
      insDoc(aux2, gLnk("S", "Work Study Group", "studygroup.html"))
      insDoc(aux2, gLnk("S", "Member Registration", "userlogin.asp?type=MBR100"))
	  insDoc(aux2, gLnk("S", "Members Directory", "userlogin.asp?type=VIMDRG100"))
	  insDoc(aux2, gLnk("S", "Discussion Forum", "userlogin.asp?type=RCD100"))
	  insDoc(aux2, gLnk("S", "Contact IMDRRG", "contactus1.html"))