foldersTree = gFld("", "")
        insDoc(foldersTree, gLnk(0, "HOME", path + "default.htm"))
        aux1 = insFld(foldersTree, gFld("PRODUCTS", ""))
            insDoc(aux1, gLnk(0, "  BODI HEAT", path + "htmls/bodiheat.htm"))
            insDoc(aux1, gLnk(0, "  BODI WRAP", path + "htmls/bodiwrap.htm"))
			insDoc(aux1, gLnk(0, "  KNEE WRAP", path + "htmls/kneewrap.htm"))
			insDoc(aux1, gLnk(0, "  NECK AND SHOULDER", path + "htmls/pinpoint.htm"))
		insDoc(foldersTree, gLnk(0, "WHY CHOOSE BODI HEAT", path + "htmls/why_choose.htm"))
		insDoc(foldersTree, gLnk(0, "FAQ", path + "htmls/faq.htm"))
        insDoc(foldersTree, gLnk(0, "SHOP ONLINE", path + "htmls/shop_online.htm"))
		insDoc(foldersTree, gLnk(0, "ABOUT OKAMOTO", path + "htmls/about_us.htm"))   	
		insDoc(foldersTree, gLnk(0, "CONTACT US", path + "htmls/contact_us.htm"))
		insDoc(foldersTree, gLnk(0, "SITE MAP", path + "htmls/site_map.htm"))
		insDoc(foldersTree, gLnk(0, "", path + ""))
		insDoc(foldersTree, gLnk(0, "FREE SAMPLE", path + "htmls/pre_free_sample_new.asp"))
 initializeDocument()