// Decide if the names are links or just the icons
USETEXTLINKS = 1 //replace 0 with 1 for hyperlinks
// Decide if the tree is to start all open or just showing the root folders
STARTALLOPEN = 0 //replace 0 with 1 to show the whole tree
ICONPATH = 'images/' //change if the gif's folder is a subfolder, for example: 'images/'
foldersTree = gFld("DR Mexicana", "derecha.html")
aux1 = insDoc(foldersTree, gLnk("R", "Quienes Somos", "quienes.html"))
aux1.iconSrc = ICONPATH + "quien.gif"
aux1 = insDoc(foldersTree, gLnk("R", "Historia", "historia.html"))
aux1.iconSrc = ICONPATH + "histo.gif"
aux1 = insFld(foldersTree, gFld("Nuestras Lineas", "derecha.html"))
aux2 = insFld(aux1, gFld("Connoisseur", "connoisseur.html"))
insDoc(aux2, gLnk("R", "Deshuesadores", "muestra.php?id_marca=1&id_funcion=14"))
insDoc(aux2, gLnk("R", "Cuchillo para pan", "muestra.php?id_marca=1&id_funcion=10"))
insDoc(aux2, gLnk("R", "Chaira", "muestra.php?id_marca=1&id_funcion=1"))
insDoc(aux2, gLnk("R", "Cuchillo curvo
para carnicero", "muestra.php?id_marca=1&id_funcion=4"))
insDoc(aux2, gLnk("R", "Cuchillos para chef", "muestra.php?id_marca=1&id_funcion=5"))
insDoc(aux2, gLnk("R", "Tenedeores", "muestra.php?id_marca=1&id_funcion=23"))
insDoc(aux2, gLnk("R", "Mondadores", "muestra.php?id_marca=1&id_funcion=19"))
insDoc(aux2, gLnk("R", "Cortadores y rebanadores", "muestra.php?id_marca=1&id_funcion=3"))
aux2 = insFld(aux1, gFld("Sani-Safe", "sanisafe.html"))
insDoc(aux2, gLnk("R", "Deshuesadores", "muestra.php?id_marca=2&id_funcion=14"))
insDoc(aux2, gLnk("R", "Cuchillo para pan", "muestra.php?id_marca=2&id_funcion=10"))
insDoc(aux2, gLnk("R", "Cuchillo para carnicero", "muestra.php?id_marca=2&id_funcion=27"))
insDoc(aux2, gLnk("R", "Chaira", "muestra.php?id_marca=2&id_funcion=1"))
insDoc(aux2, gLnk("R", "Cuchillos para chef", "muestra.php?id_marca=2&id_funcion=5"))
insDoc(aux2, gLnk("R", "Cuchillos para ostras
y almejas", "muestra.php?id_marca=2&id_funcion=9"))
insDoc(aux2, gLnk("R", "Cuchillos fileteros
para pescado", "muestra.php?id_marca=2&id_funcion=7"))
insDoc(aux2, gLnk("R", "Tenedeores", "muestra.php?id_marca=2&id_funcion=23"))
insDoc(aux2, gLnk("R", "Mondadores", "muestra.php?id_marca=2&id_funcion=19"))
insDoc(aux2, gLnk("R", "Cuchillos para pizza", "muestra.php?id_marca=2&id_funcion=12"))
insDoc(aux2, gLnk("R", "Cuchillos (produce
& canning)", "muestra.php?id_marca=2&id_funcion=6"))
insDoc(aux2, gLnk("R", "Raspadores", "muestra.php?id_marca=2&id_funcion=22"))
insDoc(aux2, gLnk("R", "Cortadores
y rebanadores", "muestra.php?id_marca=2&id_funcion=3"))
insDoc(aux2, gLnk("R", "Espatulas", "muestra.php?id_marca=2&id_funcion=16"))
insDoc(aux2, gLnk("R", "Volteadores", "muestra.php?id_marca=2&id_funcion=26"))
insDoc(aux2, gLnk("R", "Cuchillos uso general", "muestra.php?id_marca=2&id_funcion=13"))
insDoc(aux2, gLnk("R", "Complementarios", "muestra.php?id_marca=2&id_funcion=21"))
aux2 = insFld(aux1, gFld("Softgrip", "sofgrip.html"))
insDoc(aux2, gLnk("R", "Deshuesadores", "muestra.php?id_marca=3&id_funcion=14"))
insDoc(aux2, gLnk("R", "Cuchillo para pan", "muestra.php?id_marca=3&id_funcion=10"))
insDoc(aux2, gLnk("R", "Chaira", "muestra.php?id_marca=3&id_funcion=1"))
insDoc(aux2, gLnk("R", "Cuchillos curvos
para chef", "muestra.php?id_marca=3&id_funcion=4"))
insDoc(aux2, gLnk("R", "Cuchillos para chef", "muestra.php?id_marca=3&id_funcion=5"))
insDoc(aux2, gLnk("R", "Cuchillos para pescado", "muestra.php?id_marca=3&id_funcion=11"))
insDoc(aux2, gLnk("R", "Mondadores", "muestra.php?id_marca=3&id_funcion=19"))
insDoc(aux2, gLnk("R", "Cortadores y rebanadores", "muestra.php?id_marca=3&id_funcion=3"))
insDoc(aux2, gLnk("R", "Untadores para sandwich", "muestra.php?id_marca=3&id_funcion=24"))
insDoc(aux2, gLnk("R", "Cuchillos uso general", "muestra.php?id_marca=3&id_funcion=13"))
aux2 = insFld(aux1, gFld("Dexter-Russell", "dexter_russell.html"))
insDoc(aux2, gLnk("R", "Deshuesadores", "muestra.php?id_marca=4&id_funcion=14"))
insDoc(aux2, gLnk("R", "Cuchillo para pan", "muestra.php?id_marca=4&id_funcion=10"))
insDoc(aux2, gLnk("R", "Chaira", "muestra.php?id_marca=4&id_funcion=1"))
insDoc(aux2, gLnk("R", "Cuchillo curvo
para carnicero", "muestra.php?id_marca=4&id_funcion=4"))
insDoc(aux2, gLnk("R", "Cuchillos para chef", "muestra.php?id_marca=4&id_funcion=5"))
insDoc(aux2, gLnk("R", "Cuchillo para chef
tipo chino", "muestra.php?id_marca=4&id_funcion=8"))
insDoc(aux2, gLnk("R", "Hachas", "muestra.php?id_marca=4&id_funcion=17"))
insDoc(aux2, gLnk("R", "Cuchillos para ostras
y almejas", "muestra.php?id_marca=4&id_funcion=9"))
insDoc(aux2, gLnk("R", "Tenedeores", "muestra.php?id_marca=4&id_funcion=23"))
insDoc(aux2, gLnk("R", "Mondadores", "muestra.php?id_marca=4&id_funcion=19"))
insDoc(aux2, gLnk("R", "Cuchillos para pizza", "muestra.php?id_marca=4&id_funcion=12"))
insDoc(aux2, gLnk("R", "Raspadores", "muestra.php?id_marca=4&id_funcion=22"))
insDoc(aux2, gLnk("R", "Cortadores
y rebanadores", "muestra.php?id_marca=4&id_funcion=2"))
insDoc(aux2, gLnk("R", "Espatulas", "muestra.php?id_marca=4&id_funcion=16"))
insDoc(aux2, gLnk("R", "Volteadores", "muestra.php?id_marca=4&id_funcion=25"))
insDoc(aux2, gLnk("R", "Cuchillos uso general", "muestra.php?id_marca=4&id_funcion=13"))
insDoc(aux2, gLnk("R", "Complementarios", "muestra.php?id_marca=4&id_funcion=21"))
aux2 = insFld(aux1, gFld("Russell Green River", "greenriver.html"))
insDoc(aux2, gLnk("R", "Deshuesadores", "muestra.php?id_marca=5&id_funcion=14"))
insDoc(aux2, gLnk("R", "Cuchillo para pan", "muestra.php?id_marca=5&id_funcion=10"))
insDoc(aux2, gLnk("R", "Chaira", "muestra.php?id_marca=5&id_funcion=1"))
insDoc(aux2, gLnk("R", "Cuchillos para chef", "muestra.php?id_marca=5&id_funcion=5"))
insDoc(aux2, gLnk("R", "Cuchillo para chef
tipo chino", "muestra.php?id_marca=5&id_funcion=8"))
insDoc(aux2, gLnk("R", "Cuchillos para pescado", "muestra.php?id_marca=5&id_funcion=7"))
insDoc(aux2, gLnk("R", "Tenedeores", "muestra.php?id_marca=5&id_funcion=23"))
insDoc(aux2, gLnk("R", "Mondadores", "muestra.php?id_marca=5&id_funcion=19"))
insDoc(aux2, gLnk("R", "Cortadores y rebanadores", "muestra.php?id_marca=5&id_funcion=3"))
insDoc(aux2, gLnk("R", "Volteadores", "muestra.php?id_marca=5&id_funcion=26"))
aux2 = insFld(aux1, gFld("Russell International Cutlery", "russ_internaci.html"))
insDoc(aux2, gLnk("R", "Deshuesadores", "muestra.php?id_marca=6&id_funcion=14"))
insDoc(aux2, gLnk("R", "Cuchillo para pan", "muestra.php?id_marca=6&id_funcion=10"))
insDoc(aux2, gLnk("R", "Cuchillo curvo
para carnicero", "muestra.php?id_marca=6&id_funcion=4"))
insDoc(aux2, gLnk("R", "Cuchillos para chef", "muestra.php?id_marca=6&id_funcion=5"))
insDoc(aux2, gLnk("R", "Cuchillos para pescado", "muestra.php?id_marca=6&id_funcion=11"))
insDoc(aux2, gLnk("R", "Mondadores", "muestra.php?id_marca=6&id_funcion=19"))
insDoc(aux2, gLnk("R", "Cortadores y rebanadores", "muestra.php?id_marca=6&id_funcion=3"))
insDoc(aux2, gLnk("R", "Volteadores", "muestra.php?id_marca=6&id_funcion=26"))
insDoc(aux2, gLnk("R", "Cuchillos uso general", "muestra.php?id_marca=6&id_funcion=13"))
insDoc(aux2, gLnk("R", "Complementarios", "muestra.php?id_marca=6&id_funcion=21"))
aux1 = insFld(foldersTree, gFld("Productos", "derecha.html"))
aux2 = insFld(aux1, gFld("Linea Industrial", "derecha.html"))
aux3 = insFld(aux2, gFld("Procesadores de carne", "derecha.html"))
insDoc(aux3, gLnk("R", "Deshuesadores", "muestra_B.php?id_procesador=1&id_funcion=12"))
insDoc(aux3, gLnk("R", "Cuchillo curvo
para carne", "muestra_B.php?id_procesador=1&id_funcion=4"))
insDoc(aux3, gLnk("R", "Cuchillos para
carniceros", "muestra_B.php?id_procesador=1&id_funcion=7"))
insDoc(aux3, gLnk("R", "Herramientas
para carnicero", "muestra_B.php?id_procesador=1&id_funcion=15"))
insDoc(aux3, gLnk("R", "Cuchillos (heading
& treaming)", "muestra_B.php?id_procesador=1&id_funcion=3"))
insDoc(aux3, gLnk("R", "Despellejadores", "muestra_B.php?id_procesador=1&id_funcion=13"))
insDoc(aux3, gLnk("R", "Chairas", "muestra_B.php?id_procesador=1&id_funcion=10"))
insDoc(aux3, gLnk("R", "Hachas", "muestra_B.php?id_procesador=1&id_funcion=14"))
insDoc(aux3, gLnk("R", "Complementarios", "muestra_B.php?id_procesador=1&id_funcion=16"))
aux3 = insFld(aux2, gFld("Procesadores de pollo", "derecha.html"))
insDoc(aux3, gLnk("R", "Deshuesadores", "muestra_B.php?id_procesador=2&id_funcion=12"))
insDoc(aux3, gLnk("R", "Cuchillos", "muestra_B.php?id_procesador=2&id_funcion=1"))
insDoc(aux3, gLnk("R", "Chairas", "muestra_B.php?id_procesador=2&id_funcion=10"))
insDoc(aux3, gLnk("R", "Complementarios", "muestra_B.php?id_procesador=2&id_funcion=16"))
aux3 = insFld(aux2, gFld("Procesadores de pescado", "derecha.html"))
insDoc(aux3, gLnk("R", "Deshuesadores", "muestra_B.php?id_procesador=3&id_funcion=12"))
insDoc(aux3, gLnk("R", "Cuchillos para ostras
y almejas", "muestra_B.php?id_procesador=3&id_funcion=6"))
insDoc(aux3, gLnk("R", "Cuchillos para pescado", "muestra_B.php?id_procesador=3&id_funcion=8"))
insDoc(aux3, gLnk("R", "Cuchillos ergonomicos", "muestra_B.php?id_procesador=3&id_funcion=5"))
insDoc(aux3, gLnk("R", "Chairas", "muestra_B.php?id_procesador=3&id_funcion=10"))
insDoc(aux3, gLnk("R", "Complementarios", "muestra_B.php?id_procesador=3&id_funcion=16"))
aux2 = insFld(aux1, gFld("Linea alimenticia", "derecha.html"))
insDoc(aux2, gLnk("R", "Deshuesadores", "muestra_A.php?id_funcion=14"))
insDoc(aux2, gLnk("R", "Cuchillo para pan", "muestra_A.php?id_funcion=10"))
insDoc(aux2, gLnk("R", "Chaira", "muestra_A.php?id_funcion=1"))
insDoc(aux2, gLnk("R", "Cuchillo curvo
para carnicero", "muestra_A.php?id_funcion=4"))
insDoc(aux2, gLnk("R", "Cuchillos para chef", "muestra_A.php?id_funcion=5"))
insDoc(aux2, gLnk("R", "Cuchillo para chef
tipo chino", "muestra_A.php?id_funcion=8"))
insDoc(aux2, gLnk("R", "Hachas", "muestra_A.php?id_funcion=17"))
insDoc(aux2, gLnk("R", "Cuchillos para ostras
y almejas", "muestra_A.php?id_funcion=9"))
insDoc(aux2, gLnk("R", "Tenedeores", "muestra_A.php?id_funcion=23"))
insDoc(aux2, gLnk("R", "Mondadores", "muestra_A.php?id_funcion=19"))
insDoc(aux2, gLnk("R", "Cuchillos para pizza", "muestra_A.php?id_funcion=12"))
insDoc(aux2, gLnk("R", "Cuchillos (produce
& canning)", "muestra_A.php?id_funcion=6"))
insDoc(aux2, gLnk("R", "Raspadores", "muestra_A.php?id_funcion=22"))
insDoc(aux2, gLnk("R", "Cortadores
y rebanadores", "muestra_A.php?id_funcion=3"))
insDoc(aux2, gLnk("R", "Espatulas", "muestra_A.php?id_funcion=16"))
insDoc(aux2, gLnk("R", "Volteadores", "muestra_A.php?id_funcion=26"))
insDoc(aux2, gLnk("R", "Cuchillos uso general", "muestra_A.php?id_funcion=13"))
insDoc(aux2, gLnk("R", "Complementarios", "muestra_A.php?id_funcion=28"))
aux1 = insDoc(foldersTree, gLnk("R", "Contacto", "contacto.htm"))
aux1.iconSrc = ICONPATH + "contac.gif"
aux1 = insDoc(foldersTree, gLnk("R", "Tienda Virtual", "registro.html"))
aux1.iconSrc = ICONPATH + "tienda.gif"