/***************************************************************** Fichier de variables de Les Hauts de Vercia Générer automatiquemant par Agestis (http://www.agestis.com) Le 28/08/2009 par Aricia - francois ******************************************************************/ var NoOffFirstLineMenus=7; var largeurcell=168; var t=""; var isDHTML=0;var isID=0;var isAll=0;var isLayers=0; if(document.getElementById){ isID=1;isDHTML=1; }else{ if(document.all){ isAll=1;isDHTML=1; }else{ browserVersion = parseInt(navigator.appVersion); if((navigator.appName.indexOf('Netscape') != -1) && (browserVersion == 4)){ isLayers=1;isDHTML=1; } } } function findDOM(objectID, withStyle){ if (withStyle == 1){ if (isID){ return (document.getElementById(objectID).style); }else{ if (isAll){ return (document.all[objectID].style); }else{ if (isLayers){ return (document.layers[objectID]); } } } }else{ if (isID){ return (document.getElementById(objectID)); }else{ if (isAll){ return (document.all[objectID]); }else{ if (isLayers){ return (document.layers[objectID]); } } } } } var exist=false;var Tble_Display=false;var ms = navigator.appVersion.indexOf("MSIE");var ie=document.all && (ms>0) && (parseInt(navigator.appVersion.substring(ms+5, ms+6)) >4);var ns6=document.getElementById&&!document.all; var IsCompatible; // permet de tester le navigateur en compatibilité du calcul de largeur if(ns6||ie){ document.write("" +"" +"" +""); var MyTestTble = findDOM('tableTest',0); var MyTestImg = findDOM('Imgtest',0); var Img = parseInt(MyTestImg.width+0); MyTestTble.style.visibility=''; MyTestTble.style.display='none'; IsCompatible=true; } // fin du test function calc_larg(tab_menu) { if (IsCompatible) { if(exist && Tble_Display==false){ Tble_Display=true;Tble_Calc.style.display=''; } var lmax=0; if (!exist) { document.write("" +"" +"" +""); exist=true; Tble_Display=true; } Img_Calc=findDOM('ImgCalc', 0);Td_Calc=findDOM('TdCalc', 0);Td_Ft=findDOM('TdFt', 0);Tble_Calc=findDOM('TbleCalc', 0); for (var i=0 ; i"; Td_Ft.innerHTML=str_txt; if(Td_Calc.offsetWidth>0){ if (Td_Calc.offsetWidth>lmax){lmax=Td_Calc.offsetWidth;} }else{ if (Img_Calc.width>lmax){lmax=Img_Calc.width;} } } Tble_Calc.style.display='none'; Tble_Display=false; return (lmax+(LeftPaddng*2)+20); }else { return DftLrgCell2; } } var LSBC = "#007009"; var HSBC = "#c4df82"; var FSLC = "#c4df82"; var FSHC = "#007009"; var BSC = "#55a20f"; var MTCt = "left"; Menu1=new Array("Bienvenue","/affiche.asp?arbo=1&num=1","/skins/standard/images/Bttn_Menu.jpg",0,23,largeurcell,"","","","","","",-1,-1,-1,"","Les Hauts de Vercia - Gite de charme 4 épis dans le Jura, implanté dans une ancienne propriété vigneronne du SUD REVERMONT et à proximité de la BRESSE BOURGUIGNONNE"); Intitules="Le parc|La petite montagne|Refuge LPO"; t=Intitules.split("|"); LgCelSsN=calc_larg(t); Menu2_7_1=new Array(t[0],"/affiche.asp?arbo=1&num=12","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Les Hauts de Vercia est un gîte de charme avec un grand parc ombragé situé entre la Bresse et le Jura"); Menu2_7_2=new Array(t[1],"/affiche.asp?arbo=1&num=16","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Texte en 2 lignes qui apparaitron dans GOOGLE"); Menu2_7_3=new Array(t[2],"/affiche.asp?arbo=1&num=33","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Le gite des Hauts de Vercia est un refuge LPO"); Intitules="Gîte de charme 4 épis|Grande salle à vivre|Chambre coquelicot|Chambre rose trémière|Chambre Petit Prince|Sanitaires|Les charmes du parc|Tarif et Réservation"; t=Intitules.split("|"); LgCelSsN=calc_larg(t); Menu2_1=new Array(t[0],"/affiche.asp?arbo=1&num=24","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Les Hauts de Vercia est un gîte 4 épis dans le Sud Revermont, au carrefour du Jura, de la Bresse et de l'Ain"); Menu2_2=new Array(t[1],"/affiche.asp?arbo=1&num=4","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Salle à manger des \"Hauts de Vercia\", gîte de charme 4 épis dans le revermont jurassien"); Menu2_3=new Array(t[2],"/affiche.asp?arbo=1&num=6","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Description d'une chambre d'un gite de charme dans le Jura"); Menu2_4=new Array(t[3],"/affiche.asp?arbo=1&num=7","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Chambre rose trémière du gîte de charme \"Les Hauts de Vercia\" dans le revermont jurassien"); Menu2_5=new Array(t[4],"/affiche.asp?arbo=1&num=8","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"La chambre \"Petit Prince\" du gîte de charme \"Les hauts de Vercia\" dans le Jura"); Menu2_6=new Array(t[5],"/affiche.asp?arbo=1&num=9","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Les sanitaires du gîte de charme \"Les hauts de Vercia\" dans le revemont jurassien (Franche-Comté, France)"); Menu2_7=new Array(t[6],"","",3,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,""); Menu2_8=new Array(t[7],"/affiche.asp?arbo=1&num=5","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Les Hauts de Vercia : gite de charme"); Menu2=new Array("Les Hauts de Vercia","","/skins/standard/images/Bttn_Menu.jpg",8,23,largeurcell,"","","","","","",-1,-1,-1,"",""); Intitules="Gîte 3 épis|Cuisine|Le salon|Chambre 1|Chambre 2|Salle de Bain|Le petit jardin|Tarif et Réservation"; t=Intitules.split("|"); LgCelSsN=calc_larg(t); Menu3_1=new Array(t[0],"/affiche.asp?arbo=1&num=25","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Les Crets est un gîte de France classé 3 épis situé dans le Sud Revermont, au carrefour du Jura, de l'Ain et de la Bresse"); Menu3_2=new Array(t[1],"/affiche.asp?arbo=1&num=26","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Le gîte des Crêts dispose d'une cuisine toute équipée"); Menu3_3=new Array(t[2],"/affiche.asp?arbo=1&num=27","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Le gîte des Crets dispose d'un salon indépendant"); Menu3_4=new Array(t[3],"/affiche.asp?arbo=1&num=28","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"La chambre 1 du gîte des crets : 1 lit deux places, très grand placard de rangement, orientée OUEST, table valise et table de travail."); Menu3_5=new Array(t[4],"/affiche.asp?arbo=1&num=29","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"plus rustique avec 2 lits 1 place, armoire et table ronde"); Menu3_6=new Array(t[5],"/affiche.asp?arbo=1&num=30","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,""); Menu3_7=new Array(t[6],"/affiche.asp?arbo=1&num=31","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Le gîte des Crets dispose d'un petit jardin très ombragé"); Menu3_8=new Array(t[7],"/affiche.asp?arbo=1&num=23","",0,23,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Les Hauts de Vercia : gite de charme"); Menu3=new Array("Les Crets","","/skins/standard/images/Bttn_Menu.jpg",8,23,largeurcell,"","","","","","",-1,-1,-1,"",""); Menu4=new Array("Notre environnement","/affiche.asp?arbo=1&num=10","/skins/standard/images/Bttn_Menu.jpg",0,23,largeurcell,"","","","","","",-1,-1,-1,"","Les Hauts de Vercia sont un gîte de charme situé dans le Revermont jurassien"); Menu5=new Array("Tourisme et Loisirs","/affiche.asp?arbo=1&num=2","/skins/standard/images/Bttn_Menu.jpg",0,23,largeurcell,"","","","","","",-1,-1,-1,"","Tourisme et Loisirs dans le Revermont et en Bresse Bourguignonne"); Menu6=new Array("Plan d'accès","/affiche.asp?arbo=1&num=11","/skins/standard/images/Bttn_Menu.jpg",0,23,largeurcell,"","","","","","",-1,-1,-1,"","Comment venir à Vercia (Jura, France)"); Menu7=new Array("Liens","/affiche.asp?arbo=1&num=17","/skins/standard/images/Bttn_Menu.jpg",0,23,largeurcell,"","","","","","",-1,-1,-1,"","Visitez ces sites WEB");