ftexampl27.js

非常好的JAVASCRIPT树型

iconFolder = "../../images/" 
ftFolder = "../../"
var rightToLeft = true
var topOpenFolderIcon = "ftfo_rtl.gif" 		// Icon file for open top folder
var topClosedFolderIcon = "ftfc_rtl.gif" 	// Icon file for closed top folder
var openFolderIcon = "ftfo_rtl.gif" 		// Icon file for other open folders
var closedFolderIcon = "ftfc_rtl.gif" 		// Icon file for other closed folders
var documentIcon = "ftd_rtl.gif" 			// Icon file for documents
var topOpenFolderIconOver = "ftfc_rtl.gif" 	// Icon file for open top folder, mouse over	
var topClosedFolderIconOver = "ftfo_rtl.gif" 	// Icon file for closed top folder, mouse over
var openFolderIconOver = "ftfc_rtl.gif" 	// Icon file for other open folders, mouse over
var closedFolderIconOver = "ftfo_rtl.gif" 	// Icon file for other closed folders, mouse over
var documentIconOver = "ftdo_rtl.gif" 		// Icon file for documents, mouse over

pnIcon = "ftpn_rtl.gif";
mnIcon = "ftmn_rtl.gif";
pfnIcon = "ftpfn_rtl.gif";
mfnIcon = "ftmfn_rtl.gif";
plnIcon = "ftpln_rtl.gif";
mlnIcon = "ftmln_rtl.gif";
nIcon = "ftn_rtl.gif";
fnIcon = "ftfn_rtl.gif";
lnIcon = "ftln_rtl.gif";
vlIcon = "ftvl_rtl.gif";



fT = gFld("<i>Been There</i>", "ftbase.htm")
	aux1 = insFld(fT, gFld("Europe", "ftbase2.htm"))
	      aux2 = insFld(aux1, gFld("United Kingdom", "ftbase3.htm"))
		      aux3 = insFld(aux2, gFld("Scotland", "ftbase.htm"))
				insDoc(aux3, gLnk("Edinburgh", "ftbase2.htm"))
 			insDoc(aux2, gLnk("London", "ftbase3.htm"))
	      aux2 = insFld(aux1, gFld("Germany", "ftbase.htm"))
 			insDoc(aux2, gLnk("Munich", "ftbase2.htm"))
	      aux2 = insFld(aux1, gFld("Greece", "ftbase3.htm"))
 			insDoc(aux2, gLnk("Athens", "ftbase.htm"))
	      aux2 = insFld(aux1, gFld("Italy", "ftbase2.htm"))
		      aux3 = insFld(aux2, gFld("Tuscany", "ftbase3.htm"))	
			insDoc(aux3, gLnk("Florence", "ftbase.htm"))
				insDoc(aux3, gLnk("Pisa", "ftbase2.htm"))
			insDoc(aux2, gLnk("Rome", "ftbase3.htm"))
	      aux2 = insFld(aux1, gFld("Portugal", "ftbase.htm"))
 			insDoc(aux2, gLnk("Lisboa", "ftbase2.htm"))
     aux1 = insFld(fT, gFld("America", "ftbase3.htm"))
	      aux2 = insFld(aux1, gFld("Canada", "ftbase.htm"))
 			insDoc(aux2, gLnk("Montreal", "ftbase2.htm"))
	      aux2 = insFld(aux1, gFld("United States", "ftbase3.htm"))
 			insDoc(aux2, gLnk("Boston", "ftbase.htm"))
 			insDoc(aux2, gLnk("New York", "ftbase2.htm"))
 			insDoc(aux2, gLnk("Washington", "ftbase3.htm"))