function GetCoordinates()
{
	var newWin1=window.open("mappa.php","cell","toolbar=no,width=1,height=1,screenX=2000,screenY=0,directories=no,status=no,scrollbars=no,resizable=no,menubar=no")

}
function disclaimer() {
var disc = null;
bName=navigator.appName;

disc=window.open('disclaimer.php','zoom','toolbar=no,location=no,directories=no,status=no,scrollbars=yes,menubar=no,resizable=yes,width=400,height=300');
disc.focus();
}

function zoom(file) {
var finestra = null;
bName=navigator.appName;

finestra=window.open('img.php?file='+file,'zoom','toolbar=no,location=no,directories=no,status=no,scrollbars=no,menubar=no,resizable=yes,width=<?=$bigthumb_x;?>,height=<?=$bigthumb_y;?>');
finestra.focus();
}

function nuovalingua(lang) {
  var url = String(window.location) ;
  

  var index = url.indexOf('?');
  
  conc=(index == -1)?"?":"&";
    
  url = url + conc+"newlang="+lang;
  //alert (url);
  window.location=url;
}

function stampa(postvar) {
  var url = String(window.location) ;
  
  var variabili= document.location.hash ;
  
  var index = url.indexOf('?');
  
  conc=(index == -1)?"?":"&";
    
  url = url + conc+postvar+"newstampa=1";
  //alert (variabili);
  //window.location=url;
  window.open(url,'stampa','toolbar=yes,location=no,directories=yes,status=no,scrollbars=yes,menubar=no,resizable=yes,width=810,height=400');

}

function ChgLoc() 
{ 
    if ( (navigator.appName == "Microsoft Internet Explorer") && (navigator.appVersion.indexOf("2.0 ") == 0) ) { 
    }else{ 
    var obj1 = document.ricerca.lid ; 
    obj1.options[0].selected = true
    }
}
    
function ChgArea() 
{ 
    if ( (navigator.appName == "Microsoft Internet Explorer") && (navigator.appVersion.indexOf("2.0 ") == 0) ) { 
    }else{ 
    var obj1 = document.ricerca.aid ; 
    obj1.options[0].selected = true
    }
  /*  
    var obj2 = document.ric_azienda.lid ; 
    var val  = obj1.options[obj1.selectedIndex].value ; 
 	if (val == 'nessuna') {
		obj2.length = 1 
		obj2.options[0].text='Tutte'
		obj2.options[0].value='nessuna'
 <%
 m=1
 invio=chr(13)&chr(10)
 catpre=""
 scritto=false
 do until rs.EOF
	catsuc=rs("categoria")
	sotcat=rs("sottocategoria")
	if catpre<>catsuc and not scritto then 
		i=1
		response.write "} if (val == '" & rs("categoria") & "') {" & invio
		catpre=rs("categoria")
		response.write "obj2.length = "& sottocat(m) &" "& invio &"obj2.options[0].text='Tutte'" & invio & "obj2.options[0].value='tutte'"& invio
		response.write  invio &"obj2.options["& i &"].text='" & sotcat & "'" & invio & "obj2.options["& i &"].value='" & rs("idcat") & "'"& invio
		i=i+1
		m=m+1
		rs.movenext		
	else
		response.write "obj2.options["& i &"].text='" & sotcat & "'" & invio & " obj2.options["& i &"].value='" & rs("idcat") & "'"& invio
		i=i+1
		catpre=rs("categoria")
		rs.movenext
		if not rs.eof then catsuc=rs("categoria")
		if catpre<>catsuc then
			response.write "obj2.options[0].selected = true "& invio &" }"& invio &"else if (val == '" & rs("categoria") & "'){" & invio
			response.write "obj2.length = "& sottocat(m) &" "& invio &"obj2.options[0].text='Tutte'" & invio & "obj2.options[0].value='tutte'"& invio
			
			m=m+1
			scritto=true
			i=1
		end if
	end if
loop

rs.movefirst
*/
} 
